tp5 日期范围查询_VB实战应用 | 如何巧妙解决日期范围查询问题

VB与数据库

今天，我们讲解一下在VB与数据库结合开发项目中，日期区间查询问题如何解决。

VB与数据库结合开发数据库管理系统，可以使程序运行数据得到持久化保存，而且保证了数据的安全性、一致性和完整性。

程序运行图

为什么要进行日期区间查询？

在很多综合的数据管理系统中，每日产生的数据量相当多，每月累计就更多了，为了方便直观的统计出每日、每周、每月、指定区间范围的实际情况，所以我们需要用到这个功能。

提示:

本程序用到了Adodc控件、DataGrid控件、DTPicker控件(用于专门选择日期的控件)。

从部件对话框中，依次添加下面红框注明的控件

Adodc控件

DataGrid控件

DTPicker控件在此控件项目下

代码实现

Private Sub Command1_Click() '日期区间查询

  Dim Eday1 As Date, Eday2 As Date

        Eday1 = DTPicker1.Value & " 00:00:00"

        Eday2 = DTPicker2.Value & " 23:59:59"

        Adodc1.RecordSource = "select * from 信息 where 日期  between  #" & Eday1 & "# and #" & Eday2 & "#"

         Adodc1.Refresh

End Sub

运行结果图

至此，数据库日期区间查询功能实现。

大家在学习的过程中，有什么学习上的问题或者难题，欢迎交流！

VB
精选

●如何在VB中创建树形目录结构图？

●数据分析 | VB与数据库结合生成数据图表程序

●VB与数据库开发专项讲解！

●VB编程语言基础知识点总结

VB学习有难题，可以长按识别下图，添加微信在线交流。

长按上图，关注跟我学VB