Обратиться к полю таблицы по индексу - Visual Basic .NET - Ответ 3239345

  Dim PATH As String
        Dim OTV As String
        Dim dbpath As String = "..."
        Dim cn As New OleDbConnection
        Dim dt As DataTable
        Dim Ct As DataTable
        Dim J
 
        PATH = GetSetting("MY_BAZ", "BAZA", "PATH", "")
 
        If PATH = "" Then
            OTV = MsgBox("Не установлен путь к базе!!", vbYesNo, "Укажите путь")
            If OTV = 7 Then Exit Sub
            Подключит_баз() ' процедура запроса и сохранения пути  
            PATH = GetSetting("MY_BAZ", "BAZA", "PATH", "")
 
        End If
 
        'Получение списка полей таблицы
 
        With cn
            Try
                cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & PATH
                cn.Open()
                Ct = cn.GetOleDbSchemaTable(System.Data.OleDb.OleDbSchemaGuid.Columns, _
                       New Object() {Nothing, Nothing, "Расписание", Nothing})
           
            Catch ex As Exception
                MsgBox(ex.Message)
          
            Finally
                .Close()
            
            End Try
 
        End With
 
        For Each r As DataRow In Ct.Rows'распечатываем имя и позицию
            Trace.WriteLine(r("Column_Name").ToString, r("ORDINAL_POSITION").ToString)
        Next
 
'Должно же быть такое!?
        For J = 1 To Ct.Rows.Count
            Trace.WriteLine(???????????)' не могу правильно сформулировать обращение по индексу
        Next