Liste in Vb.net Sqldatareader

Question

Gibt es eine Möglichkeit, die Liste auf diesen Code angewendet werden? In Bezug auf die Bereitstellung der Textfelder und der Datenreader Elemente.

Dim sConnection As String = "server=(local);uid=sa;pwd=PassWord;database=DatabaseName" 
Using Con As New SqlConnection(sConnection) 
    Con.Open() 
    Using Com As New SqlCommand("Select * From tablename", Con) 
     Using RDR = Com.ExecuteReader() 
      If RDR.HasRows Then 
       Do While RDR.Read 
        txtName.Text = RDR.Item("Name").ToString() 
       Loop 
      End If 
     End Using 
    End Using 
    Con.Close() 
End Using 

Answer 1

Dim sConnection As String = "server=(local);uid=sa;pwd=PassWord;database=DatabaseName" 
Using Con As New SqlConnection(sConnection) 
Con.Open() 
Using Com As New SqlCommand("Select * From tablename", Con) 
    Using RDR = Com.ExecuteReader() 
     If RDR.HasRows Then 
      Do While RDR.Read 
       txtName.Text =txtName.Text & RDR.Item("Name").ToString() & VBCLRF 
      Loop 
     End If 
    End Using 
End Using 
Con.Close() 
End Using