Populating a combo box

[pulipatinaresh]

Hi All,

Iam new to Vb.net trying to Populate a combo box.With a column in components table from ODBC.The ODBC is fromm ware house .

My code is as follows

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
Dim Cmd As.OdbcCommand
Dim Con As Odbc.OdbcConnection
Dim Sql As String = Nothing
Dim Reader As Odbc.OdbcDataReader
Dim ComboRow As Integer = -1
Dim Columns As Integer = 0
Dim Category As String = Nothing
Dim db As DataSet

CmbBoxMan.Items.Clear()

db = DBEngine.Workspaces(0).OpenDatabase("kpidatabase", , "DSN=kpidatabase;UID=kpiuser;PWD=kpiuser")

Sql = "SELECT [comp_itemnumber] FROM [componnets] ORDER BY [comp_itemnumber] Asc"
Cmd = New Odbc.OdbCommand(Sql, Con)
Con.Open()

Reader = Cmd.ExecuteReader()
While Reader.Read()
For Columns = 0 To Reader.FieldCount - 1
Category = Reader.Item(Columns) 'READ COLUMN FROM DATABASE
Next
CmbBoxMan.Items.Add(Category)
ComboRow += 1
End While
Con.Close()


End Sub

Please reply

Thanks in advance

[Phil Weber]

Take a look at the section, "Working With Combo Boxes and List Boxes" at this page: http://msdn2.microsoft.com/En-US/library/ms973824.aspx