Значение типа "DataRow" невозможно преобразовать в STRING

Public Class Form2
    Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
 
        lblTestName.Text = Form1.cmbTest.Text
        lblName.Text = Form1.TextBox1.Text
 
        Dim sqlstr As String = ("select * from queans where ""NUMBER""=1")
        Debug.Print(sqlstr)
        Dim conString As String
        Dim sqlcmd As New Npgsql.NpgsqlCommand(sqlstr, con)
        Dim DA As Npgsql.NpgsqlDataAdapter
        Dim DT As New Data.DataTable
        Dim DR As Npgsql.NpgsqlDataReader
 
 
        conString = "SERVER=192.168.92.202;PORT=5432; USER ID=*****; PASSWORD=******!; DATABASE=divisions"
        con = New Npgsql.NpgsqlConnection(conString)
 
        con.Open()
 
        DA = New Npgsql.NpgsqlDataAdapter(sqlcmd)
        DA.Fill(DT)
        DR = sqlcmd.ExecuteReader
        Do While DR.Read
            rtbQue.Text = DT.Rows(1)
            rtbAns1.Text = DT.Rows(2)
            rtbAns2.Text = DT.Rows(3)
        Loop
 
        'rtbQue.Text = sqlcmd.ExecuteScalar()
 
 
    End Sub
End Class

rtbQue.Text = DT.Rows(1).Item("имя поля")   '(или индекс)

rtbQue.Text = DT.Rows(1)(0)

Dim DR As New Npgsql.NpgsqlDataReader

DR = sqlcmd.ExecuteReader

Dim sqlcmd As New Npgsql.NpgsqlCommand(sqlstr, con)
        Dim DA As Npgsql.NpgsqlDataAdapter
        DA = New Npgsql.NpgsqlDataAdapter(sqlcmd)
        DA.Fill(DT)
        'DR = sqlcmd.ExecuteReader
        'Do While DR.Read
        rtbQue.Text = DT.Rows(0)(0)
        rtbAns1.Text = DT.Rows(0)(1)
        rtbAns2.Text = DT.Rows(0)(2)
        rtbAns3.Text = DT.Rows(0)(3)