Если в таблице базы пустая ячейка, то при выгрузке в ListView возникает ошибка - VB
Формулировка задачи:
Доброго времени суток!
Возникли некоторые вопросы при работе с БД.
Загружаю в ListView данные из базы вот таким образом:
Итак, вопросы.
1) Если в таблице базы пустая ячейка, то при выгрузке в ListView возникает ошибка. Как этого избежать?
2) В событии Form_Load() добавляю заголовки в ListView вручную, а хотелось бы получить кол-во столбцов в таблице базы и их заголовки и уже "плясать" от полученных данных.
3) Как программно в таблицу базы данных добавить новый столбец?
Заранее спасибо!
Решение задачи: «Если в таблице базы пустая ячейка, то при выгрузке в ListView возникает ошибка»
textual
Листинг программы
DSNName = "DRIVER=Microsoft Access Driver (*.mdb, *.accdb);DBQ=" & App.Path DSNName = DSNName & HomeDir & "\База данных3.mdb" conn.Open DSNName SQL = "select * from Sheet1 " & "WHERE ФИО LIKE '%" & Text4.Text & "%'" rs.Open SQL, conn, 3, 3 For i = 1 To rs.Fields.Count With ListView1.ColumnHeaders .Add , , rs.Fields(i - 1).Name, 1000 End With Next i Set rs = Nothing conn.Close LoadData
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д