как узнать названия полей базы данных через VB6 - VB

Формулировка задачи:

У меня есть база данных Access в которой имеется таблица "Студенты", а названия полей не известны. Как можно через программу узнать названия всех полей в этой таблице. Очень надо. ПОМОГИТЕ ПОЖАЛУЙСТА!!!!


textual

Код к задаче: «как узнать названия полей базы данных через VB6 - VB»

'Кинь на форму ListBox,Data и CommandButton
    
    Private Sub Form_Load()
    
    Data1.DatabaseName = "D:\Program Files\Microsoft Visual Studio\VB98\Biblio.mdb"
    Data1.RecordSource = "Publishers"
    Data1.Refresh
    
    End Sub
    
    
    Private Sub Command1_Click()
    
    Dim i As Integer
    
    For i = 0 To Data1.Recordset.Fields.Count - 1
    'Производим запись имени поля в элемент ListBox
    List1.AddItem Data1.Recordset.Fields(i).Name
    Next
    
    End Sub
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

12   голосов, оценка 3.833 из 5

Источник