Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Связка VB & Access Добавлено: 23.12.08 20:52  

Автор вопроса:  Alexandr Z.
при выводе таблицы из Access в вб выводит вместо всей таблицы лишь первую строчку. Могу лишь предположить, что причина кроеться в нехватке памяти.
Помогите пожалуйста устранить данную проблему.
Заранее благодарен.

Код вывода таблицы:
Data1.Recordset.MoveFirst
T1.Rows = Data1.Recordset.RecordCount + 1: T1.Cols = 10
T1.TextMatrix(0, 0) = "Курс"
T1.TextMatrix(0, 1) = "Группа"
T1.TextMatrix(0, 2) = "Шифр"
T1.TextMatrix(0, 3) = "ФИО"
T1.TextMatrix(0, 4) = "Гос_1"
T1.TextMatrix(0, 5) = "Гос_2"
T1.TextMatrix(0, 6) = "Гос_3"
T1.TextMatrix(0, 7) = "Гос_4"
T1.TextMatrix(0, 8) = "Гос_5"
T1.TextMatrix(0, 9) = "Гос_6"
Data1.Recordset.MoveFirst
For i = 1 To Data1.Recordset.RecordCount
  For j = 1 To 10
    T1.TextMatrix(i, j - 1) = Data1.Recordset.Fields(j - 1)
       Next j
  Data1.Recordset.MoveNext
Next i
Data1.Recordset.MoveFirst

Ответить

  Ответы Всего ответов: 1  

Номер ответа: 1
Автор ответа:
 Alexandr Z.



Вопросов: 2
Ответов: 3
 Профиль | | #1 Добавлено: 23.12.08 22:23
Решил проблему путем добавления цикла:

Data1.Refresh
While Data1.Recordset.EOF = False
Data1.Recordset.MoveNext
Wend

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам