Question

求大神指点！~ 如何从数据库中读取数据添加到combobox的Items选项中 用的是access和vb.net

拜托了 我是小白 求代码 需自己输入的部分请用相关文字表示
Dim conn As New OleDbConnection
conn.ConnectionString = str
conn.Open()
Dim cmd As New OleDbCommand()
cmd.CommandText = sqlstr
cmd.Connection = conn
cmd.ExecuteNonQuery()
Dim reader = cmd.ExecuteReader(CommandBehavior.CloseConnection)
If (reader.Read()) Then
comboBox1.Items.Add(reader[0].ToString())
End If
那个倒数第二行的[0] 有问题 为什么啊？

Answer 1

如果你查出来的结果很多，那就要判断，然后一个一个加到combox1的item里面去
下面的代码是把出来的结果一行一行加到combox里面。取的是第一列的数据
ds.tables(0).row(i).items(0).ToString())
表示第i行第1列；
希望对你有帮助
if ds.table(0).rows.count>0 then
dim i as integer
for i=0 to ds.table(0).rows.count-1
comboBox1.Items.Add(ds.tables(0).row(i).items(0).ToString())
next
end if