Работа с ListView - VB
Формулировка задачи:
Извиняюсь если подобная тема уже была, сам не нашёл.
Суть вопроса такова:
можно ли отобразить данные, взятые из БД на MS Access, за определённый промежуток времени? Например, есть данные, датированные за весь год, а нужно отобразить только за 1 месяц. Какой именно месяц (то бишь промежуток), задаётся пользователем.
И в догонку, если всё таки такое возможно, то как подсчитать сумму значений из данного интервала. То есть, допустим в первом столбце отображается дата, а во втором числа, и нужно просуммировать эти цифры именно за этот интервал.
Ежели всё это можно организовать без ListView, то рад выслушать предложения.
Решение задачи: «Работа с ListView»
textual
Листинг программы
Private Sub Кнопка13_Click() Dim SUM Dim dbs As DAO.Database Dim dba As DAO.Recordset Set dbs = CurrentDb() Set dba = dbs.OpenRecordset("TB") dba.MoveFirst Do Until dba.EOF If dba.Fields(0) >= Начало.Value _ And dba.Fields(0) <= Конец.Value Then SUM = SUM + CDbl(dba.Fields(1)) Debug.Print CDbl(dba.Fields(1)), SUM End If dba.MoveNext Loop End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д