2014-12-22 1 views
0

메신저 vb.net 및 mysql 쿼리를 사용하여 새로운 여기에 내 문제에 맞는 솔루션을 찾을 수 없습니다. 난 (10) 텍스트 상자를 가지고 코드 아래Textbox 배열 연결된 MySQL 데이터베이스

 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

당신에게

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 
도움이 될 것입니다 난 10 개 내 데이터베이스 질문하지만 아래의 코드는 마지막 질문에 첫 번째 텍스트 상자를 채우고 그것을 채우려