считыватель данных в vb.net

Question

Пожалуйста, помогите, как сделать эквивалентный цикл цикла для цикла. Чтобы я мог читать из одной строки в таблице базы данных mysql и отображать ее в combobox в vb.net.

Я использую этот код, но его определенно не полезно, если есть 3 или более элементов, которые добавляются в строке:

Dim i As Integer 
     Dim rdr As Odbc.OdbcDataReader 
     rdr = con.readfrom_drug_type_table() 
    For i = 0 To 1 
     If rdr.HasRows = True Then 
      rdr.Read() 

      ComboBox2.Items.Add(rdr("Drug_type")) 
     End If 
    Next i 

Я хочу, чтобы прочитать все данные о том, что Drug_type ряд Пожалуйста, помогите благодаря

Answer 1

Если вы хотите прочитать только первую строку, чем просто использовать

If rdr.Read() Then 
    ComboBox2.Items.Add(rdr("Drug_type")) 
End If 

Update

Try 
    myConnection = New SqlConnection("server=localhost;uid=sa;pwd=;database=pubs") 
    'you need to provide password for sql server 
    myConnection.Open() 
    myCommand = New SqlCommand("Select * from discounts", myConnection) 
    dr = myCommand.ExecuteReader 

     While dr.Read() 
      WriteLine(dr(0)) 
      WriteLine(dr(1)) 
      WriteLine(dr(2)) 
      WriteLine(dr(3)) 
      WriteLine(dr(4)) 
      ' writing to console 
     End While 
Catch 
End Try 
dr.Close() 
myConnection.Close() 

Answer 2

@pranay Вам не нужны вложенные циклы.

Try 
    myConnection = New SqlConnection("server=localhost;uid=sa;pwd=;database=pubs") 
    myConnection.Open() 
    myCommand = New SqlCommand("Select * from discounts", myConnection) 
    dr = myCommand.ExecuteReader() 
    While dr.Read() 
     WriteLine(dr(0)) 
     WriteLine(dr(1)) 
     WriteLine(dr(2)) 
     WriteLine(dr(3)) 
     WriteLine(dr(4)) 
    End While 
    dr.Close() 
Finally 
    myConnection.Close() 
End Try