如何填充組合框在VBdotNet

Question

如何pupolate在VB.Net組合框，該項目從DataSet中...這裏是我的代碼

Dim LibDSPopulate As New DataSet 
     Dim LibDAPopulate As OdbcDataAdapter = New OdbcDataAdapter("SELECT DISTINCT Category FROM tblBooks", LibConn) 
     LibDAPopulate.Fill(LibDSPopulate, "tblBooks") 

     cmbCategoryF.Items.Add(LibDSPopulate) 

Answer 1

您可以使用數據綁定facility。

'Add an empty entry 
Dim dr As DataRow = LibDSPopulate.Tables("tblBooks").NewRow 
dr("Category") = "***Select***" 
LibDSPopulate.Tables("tblBooks").Rows.InsertAt(dr, 0) 

cmbCategoryF.DataSource=LibDSPopulate.Tables("tblBooks") 
cmbCategoryF.DisplayMember="Category" 'Name of field 
cmbCategoryF.ValueMember="Category" 'Name of field 

如果您不想使用databindng，則使用Items.Add（）方法添加每個項目。

 For Each row As DataRow In LibDSPopulate.Tables("tblBooks").Rows 
    ComboBox1.Items.Add(row("Category")) 
Next