1、如何加载

VB默认的控件栏中是没有DTpicker日期控件的,添加过程:工程——部件——“MicrosoftWindows Common Controls-2.6.0”

——应用——确定

2、几个主要属性:

 

CustomFormat

获得或设置用于在控件中格式化日期和/或时间的自定义格式字符串

Format

决定是否使用标准或自定义格式显示日期和时间。

取值为:

0 dtpLongDate

1 dtpShortDate

2 dtpTime

3 dtpCustom

MaxDate

获得或设置能被显示或者通过控件接受的最近日期

MinDate

获得或设置能被显示或者通过控件接受的最早日期。

Value

获得或设置当前日期

3、在SQL中取值语句:

txtSQL = "select * fromCancelCard_Info where Date<='" & 结束日期 & "'" &"and date>='" & 开始日期 & "'"

当然单单这样很可能取不出来值;最大的因素就是日期的格式不统一。比如,yyyy-mm-dd   、  yyyy/mm/dd

所以,我们还需要转换日期的格式:

1、Format(DTPckStart.Value,"yyyy-mm-dd")

2、利用convert函数转换

示例代码

Private Sub cmdFind_Click()Dim StartDate As String     '用于存放开始时间Dim EndDate As String       '用于存放结束时间StartDate = Format(DTPckStart.Value, "yyyy-mm-dd")EndDate = Format(DTPckEnd.Value, "yyyy-mm-dd")txtSQL = "select * from CancelCard_Info where Date<='" & EndDate & "'" & "and date>='" & StartDate & "'"'txtSQL = "select * from ReCharge_Info where date between '" & StartDate & "'and'" & EndDate & "'"Set mrc = ExecuteSQL(txtSQL, Msgtext)If DTPckStart.Value > DTPckEnd.Value ThenMsgBox "请选择正确的时间范围!", vbOKOnly + vbExclamation, "提示"Exit SubElseIf mrc.EOF ThenMsgBox "没有记录!", vbOKOnly + vbExclamation, "提示"myFlexGrid.Clear    '清除myFlexGrid 的内容Exit SubElseWith myFlexGrid     'myFlexGrid添加内容
·
·
·
End sub

玩转控件DTPicker相关推荐

  1. winform 异步弹窗窗体_玩转控件:重写/重绘Dev中MessageBox弹窗控件

    很久没有更新博客了,本想着直接发一篇<手撕ERP>系列,从控件重写.重绘,到框架搭建,再到部分模块实现+业务的.但是每次动手的时候,都觉得难以下手.直接从数据库设计开始吧,模块设计还没定下 ...

  2. 玩转控件:对Dev的GridControl控件扩展

    缘由 一切实现来源于需求,目的在于不盲目造轮子,有小伙伴儿在看了<玩转控件:对Dev中GridControl控件的封装和扩展>文章后,私信作者说,因公司业务逻辑比较复杂,展示字段比较多,尤 ...

  3. 玩转控件:封装Dev的LabelControl和TextEdit

    缘由 俗话说的好:"工欲善其事必先利其器",作为软件攻城狮也是同样道理,攻城狮开发的软件目的是简化客户的操作,让客户动动手指就可以完成很多事情,减少人力成本.这也是系统/软件存在的 ...

  4. 玩转控件:重写/重绘Dev中MessageBox弹窗控件

    很久没有更新博客了,本想着直接发一篇<手撕ERP>系列,从控件重写.重绘,到框架搭建,再到部分模块实现+业务的.但是每次动手的时候,都觉得难以下手.直接从数据库设计开始吧,模块设计还没定下 ...

  5. Silverlight玩转控件(二)——Canvas布局

    在接下来的几篇文章中,我将来介绍Silverlight相关的布局知识. 在Silverlight中,布局主要有三种方式: 1. Cavas 2. StackPanel 3. Grid 在传统的ASP. ...

  6. 玩转控件:Fucking ERP之流程图

    前言 首先,跟守护在作者公众号和私信作者催更的朋友们道个歉.疫情的原因,公司从年初到现在一直处于996+的高压模式,导致公众号更新频率较低.而且作者每更新一篇原创公众号,既要对自己沉淀知识负责,也要对 ...

  7. 机房系统(八)——【日期控件DTPicker、比较日期大小】

    "宁可让程序(员)多干活,也不能让用户多做".本着为用户着想.给用户以方便的原则,系统中用选代替填,给用户减少很多不必要的麻烦.     在机房系统里遇到了填写日期的问题.VB中已 ...

  8. 玩转控件:对Dev中GridControl控件的封装和扩展

    清明节 清明时节雨纷纷 路上行人欲断魂 借问酒家何处有 牧童遥指杏花村 又是一年清明节至,细雨绵绵犹如泪光,树叶随风摆动.... 转眼间,一年又过去了三分之一,疫情的严峻让不少企业就跟清明时节的树叶一 ...

  9. 《实用VC编程之玩转控件》第1课:Windows编程简介

    本文转载自: VC驿站 https://www.cctry.com/thread-297374-1-1.html 0.开发环境: 操作系统:Microsoft Windows 7 Ultimate S ...

最新文章

  1. 深入浅出WPF——x:Class详解
  2. 第六课.Python函数(三)
  3. OpenGL编程指南11:组合运动示例2—创建机器人手臂模型
  4. javascript json_JavaScript 之 JSON.parse 导致大数精度丢失问题的解决方案
  5. android studio工程特点,Android Studio的重要特性
  6. html select选择事件_一道搜狗面试题:IO多路复用中select、poll、epoll之间的区别...
  7. 如何判断当前请求的是健康检查API
  8. java mysql 事物_java基础之MySQL事务和视图
  9. LeetCode445——Add Two Numbers II(两个链表数据相加(从链表尾部开始),返回新链表)
  10. 《南方都市报》:三鹿集团300万摆平搜索引擎?
  11. 漫谈Servlet(一)
  12. 鼠标linux驱动安装失败,win7插入鼠标提示未能成功安装设备驱动程序怎么办
  13. rehl7安装mysql5.7_Linux RPM包安装总结
  14. cmake release和debug代码运行效果不一样_这35个小细节,让你的Java 代码运行效率翻倍!...
  15. 网络中的那些事儿(二)之总体规划
  16. 为 iOS 6 量身打造 Apps
  17. 【原创】纯CSS 仿U9论坛 箭形导航栏 兼容IE6+IE7+FF
  18. linux配置网页访问不了怎么办,本机浏览器访问不到Linux虚拟机中的nginx开启页面...
  19. Cocos2d-x 引擎概要
  20. 32位计算机怎么安装ps,我可以在64位系统上安装32位Photoshop吗?

热门文章

  1. NAND_FLASH_内存详解与读写寻址方式
  2. dex字符串解密_某Xposed微信群发工具dex解密分析
  3. Android Studio 3.0+ 新Dex编译器D8 Desugar R8
  4. 江在川上曰:云服务器上的flask项目部署(Ubuntu+Flask+Gunicorn+Supervisor+Nginx+Anaconda)
  5. VB中Byval和byref的区别
  6. 三大集合:List、Map、Set
  7. 功能测试之电梯的测试用例【杭州多测师】【杭州多测师_王sir】
  8. 统计各个部门对应员工涨幅的次数总和,给出部门编码dept_no、部门名称dept_name以及次数sum
  9. Kafka produce flush 引起的性能分析
  10. Python 关于时间处理之时间相减