ms Доступ: как сохранить содержимое таблицы в массиве строк?

Question

Я работаю над базой данных MS.

В какой-то момент мне нужно было создать модуль, содержащий динамический массив строк, данные для хранения в этом массиве должны быть доставлены из таблицы, я использую count (*) в этой таблице, чтобы определить размер динамического массива.

Мне нужно знать, как заполнить массив содержимым столбцов этой таблицы (называемых именами);

, чтобы сделать его более ясным: предположим, я объявлен массив как этот

dim myArray() as string 
redim myArray(myTable.count(*)) 

где моя таблица содержит два поля: ID, Имя

я хочу туАггау (0), чтобы держать содержание Имя в первой записи туАггау (1) держать содержание Имя во второй записи

и так далее

как это сделать?

Answer 1

Я не уверен, почему вы хотели бы использовать массив, но вот способ заимствован из Microsoft article:

Dim objConnection as ADODB.Connection 
Dim objRecordSet as ADODB.Recordset 
Dim arrTest as variant 

Set objConnection = CurrentProject.Connection 
Set objRecordSet = New ADODB.Recordset 

objRecordSet.Open "SELECT * FROM YourTable" , objConnection, _ 
    adOpenStatic, adLockOptimistic 

arrTest = objRecordSet.GetRows 

objRecordSet.Close 

objConnection.Close