2个回答
展开全部
先从数据库中获取到要添加的值
sql = “select value from table”
Dim da = New SqlDataAdapter(sql, conn)
Dim ds = New DataSet
da.Fill(ds, "tb_query")
然后加入的下拉框中
Me.ComboBox1.Items.Add("")
for i=0 to ds.tables("tb_query").Rows.Count-1
Me.ComboBox1.Items.Add(ds.Tables("tb_query").Rows(i).Item(0))
next
sql = “select value from table”
Dim da = New SqlDataAdapter(sql, conn)
Dim ds = New DataSet
da.Fill(ds, "tb_query")
然后加入的下拉框中
Me.ComboBox1.Items.Add("")
for i=0 to ds.tables("tb_query").Rows.Count-1
Me.ComboBox1.Items.Add(ds.Tables("tb_query").Rows(i).Item(0))
next
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询