VB.NET นำค่าจากฐานข้อมูลมาแสดงเป็นคำถามใน RadioButton VB2005 วนลูป

		With Me.myRdoList1
			.DataSource = dt
			.DataTextField = "CountryName"
			.DataValueField = "CountryCode"
			.DataBind()
		End With

 Private Sub check_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim strConn As String
        strConn = DBConnString.strConn

        Conn = New SqlConnection()
        With Conn
            If .State = ConnectionState.Open Then .Close()
            .ConnectionString = strConn
            .Open()
        End With
        sb.Append("SELECT * FROM Health;")
        Dim sqlIni As String
        sqlIni = sb.ToString()

        com = New SqlCommand()
        With com
            .CommandText = sqlIni
            .CommandType = CommandType.Text
            .Connection = Conn
            dr = .ExecuteReader()
            If dr.HasRows Then
                dtch = New DataTable()
                dtch.Load(dr)


                With Me.myRdoList1
                    .DataSource = dtch
                    .DataTextField = "CountryName"
                    .DataValueField = "CountryCode"
                    .DataBind()
                End With
       
            End If


        End With
        dr.Close()

        
    End Sub