Public Class RoomInfo
Dim ValTx As String
Dim ValNr As Integer
Private Sub cboRoomType_DropDown(sender As System.Object, e As System.EventArgs) Handles cboRoom
It is telling you that you have specified a different number of column to insert into (8) than the number of values to insert (6). This is because you have concatenated 2 of the values into 2 field I believe, just count them and you will see what I mean.