Работа с ListView - VB

Узнай цену своей работы

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

Извиняюсь если подобная тема уже была, сам не нашёл. Суть вопроса такова: можно ли отобразить данные, взятые из БД на MS Access, за определённый промежуток времени? Например, есть данные, датированные за весь год, а нужно отобразить только за 1 месяц. Какой именно месяц (то бишь промежуток), задаётся пользователем. И в догонку, если всё таки такое возможно, то как подсчитать сумму значений из данного интервала. То есть, допустим в первом столбце отображается дата, а во втором числа, и нужно просуммировать эти цифры именно за этот интервал. Ежели всё это можно организовать без ListView, то рад выслушать предложения.

Решение задачи: «Работа с ListView»

textual
Листинг программы
  1. Private Sub Кнопка13_Click()
  2. Dim SUM
  3. Dim dbs As DAO.Database
  4. Dim dba As DAO.Recordset
  5. Set dbs = CurrentDb()
  6. Set dba = dbs.OpenRecordset("TB")
  7.  dba.MoveFirst
  8.   Do Until dba.EOF
  9.   If dba.Fields(0) >= Начало.Value _
  10.   And dba.Fields(0) <= Конец.Value Then
  11.       SUM = SUM + CDbl(dba.Fields(1))
  12.        Debug.Print CDbl(dba.Fields(1)), SUM
  13.   End If
  14.  dba.MoveNext
  15. Loop
  16. End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 4.1 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут