|
分類:[VB.NET/VB2005 以降]
いつもこちらのTipsにはお世話になっております。
VB2008使用しています。(VB.net初心者です。)
下記のようにDBのデータをコンボボックスのリストにしています。
コンボボックスは15個ありまして、それら全てを同じリストにしたいのですが
方法がわかりません。
Datasetを配列にすればいいのでしょうか・・・?
宜しくお願い致します。
Dim Cmd As New OleDbCommand()
Dim Da As New OleDbDataAdapter
Dim Ds As DataSet = New DataSet
Dim strSQL As String
strSQL = "SELECT * FROM TBL_TEST ORDER BY ID"
Cmd.CommandText = strSQL
Da.SelectCommand = Cmd
Da.Fill(Ds, "TBL_TEST")
ComboBox1.DataSource = Ds.Tables("TBL_TEST")
ComboBox1.DisplayMember = "DATA1"
ComboBox1.ValueMember = "ID"
|