我是使用vb.net和mysql查询的新手,我无法在这里找到解决问题的正确方法。 我有10个文本框,我想用我的数据库中的10个问题填写它,但下面的代码只填充第一个带有最后一个问题的文本框
Dim txtQ() As TextBox = {txtQ1, txtQ2, txtQ3}
Dim r As MySqlDataReader
Dim i As Integer
con.Open()
cmd = New MySqlCommand("select * from tbexam", con)
r = cmd.ExecuteReader
For i = 0 To 9
While r.Read
txtQ(i).Text = r.GetString("exam_question")
End While
Next
con.Close()
答案 0 :(得分:0)
以下代码可以帮助您
Dim i As Integer = 0
While r.Read
If i <= 9 Then
txtQ(i).Text = r.GetString("exam_question")
i = i + 1
End If
End While