玩转控件DTPicker
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相关推荐
- winform 异步弹窗窗体_玩转控件:重写/重绘Dev中MessageBox弹窗控件
很久没有更新博客了,本想着直接发一篇<手撕ERP>系列,从控件重写.重绘,到框架搭建,再到部分模块实现+业务的.但是每次动手的时候,都觉得难以下手.直接从数据库设计开始吧,模块设计还没定下 ...
- 玩转控件:对Dev的GridControl控件扩展
缘由 一切实现来源于需求,目的在于不盲目造轮子,有小伙伴儿在看了<玩转控件:对Dev中GridControl控件的封装和扩展>文章后,私信作者说,因公司业务逻辑比较复杂,展示字段比较多,尤 ...
- 玩转控件:封装Dev的LabelControl和TextEdit
缘由 俗话说的好:"工欲善其事必先利其器",作为软件攻城狮也是同样道理,攻城狮开发的软件目的是简化客户的操作,让客户动动手指就可以完成很多事情,减少人力成本.这也是系统/软件存在的 ...
- 玩转控件:重写/重绘Dev中MessageBox弹窗控件
很久没有更新博客了,本想着直接发一篇<手撕ERP>系列,从控件重写.重绘,到框架搭建,再到部分模块实现+业务的.但是每次动手的时候,都觉得难以下手.直接从数据库设计开始吧,模块设计还没定下 ...
- Silverlight玩转控件(二)——Canvas布局
在接下来的几篇文章中,我将来介绍Silverlight相关的布局知识. 在Silverlight中,布局主要有三种方式: 1. Cavas 2. StackPanel 3. Grid 在传统的ASP. ...
- 玩转控件:Fucking ERP之流程图
前言 首先,跟守护在作者公众号和私信作者催更的朋友们道个歉.疫情的原因,公司从年初到现在一直处于996+的高压模式,导致公众号更新频率较低.而且作者每更新一篇原创公众号,既要对自己沉淀知识负责,也要对 ...
- 机房系统(八)——【日期控件DTPicker、比较日期大小】
"宁可让程序(员)多干活,也不能让用户多做".本着为用户着想.给用户以方便的原则,系统中用选代替填,给用户减少很多不必要的麻烦. 在机房系统里遇到了填写日期的问题.VB中已 ...
- 玩转控件:对Dev中GridControl控件的封装和扩展
清明节 清明时节雨纷纷 路上行人欲断魂 借问酒家何处有 牧童遥指杏花村 又是一年清明节至,细雨绵绵犹如泪光,树叶随风摆动.... 转眼间,一年又过去了三分之一,疫情的严峻让不少企业就跟清明时节的树叶一 ...
- 《实用VC编程之玩转控件》第1课:Windows编程简介
本文转载自: VC驿站 https://www.cctry.com/thread-297374-1-1.html 0.开发环境: 操作系统:Microsoft Windows 7 Ultimate S ...
最新文章
- 深入浅出WPF——x:Class详解
- 第六课.Python函数(三)
- OpenGL编程指南11:组合运动示例2—创建机器人手臂模型
- javascript json_JavaScript 之 JSON.parse 导致大数精度丢失问题的解决方案
- android studio工程特点,Android Studio的重要特性
- html select选择事件_一道搜狗面试题:IO多路复用中select、poll、epoll之间的区别...
- 如何判断当前请求的是健康检查API
- java mysql 事物_java基础之MySQL事务和视图
- LeetCode445——Add Two Numbers II(两个链表数据相加(从链表尾部开始),返回新链表)
- 《南方都市报》:三鹿集团300万摆平搜索引擎?
- 漫谈Servlet(一)
- 鼠标linux驱动安装失败,win7插入鼠标提示未能成功安装设备驱动程序怎么办
- rehl7安装mysql5.7_Linux RPM包安装总结
- cmake release和debug代码运行效果不一样_这35个小细节,让你的Java 代码运行效率翻倍!...
- 网络中的那些事儿(二)之总体规划
- 为 iOS 6 量身打造 Apps
- 【原创】纯CSS 仿U9论坛 箭形导航栏 兼容IE6+IE7+FF
- linux配置网页访问不了怎么办,本机浏览器访问不到Linux虚拟机中的nginx开启页面...
- Cocos2d-x 引擎概要
- 32位计算机怎么安装ps,我可以在64位系统上安装32位Photoshop吗?
热门文章
- NAND_FLASH_内存详解与读写寻址方式
- dex字符串解密_某Xposed微信群发工具dex解密分析
- Android Studio 3.0+ 新Dex编译器D8 Desugar R8
- 江在川上曰:云服务器上的flask项目部署(Ubuntu+Flask+Gunicorn+Supervisor+Nginx+Anaconda)
- VB中Byval和byref的区别
- 三大集合:List、Map、Set
- 功能测试之电梯的测试用例【杭州多测师】【杭州多测师_王sir】
- 统计各个部门对应员工涨幅的次数总和,给出部门编码dept_no、部门名称dept_name以及次数sum
- Kafka produce flush 引起的性能分析
- Python 关于时间处理之时间相减