ntjm.net
当前位置:首页 >> vB中正确的日期型常量 >>

vB中正确的日期型常量

VB6.0中合法的日期型常量须以数字符号 (#) 扩起来.月份在前,中间是日期,最后是年份.例:Option Explicit Const myDate As Date = #12/1/1993#Date 数据类型 Date 变量存储为 IEEE 64 位(8 个字节)浮点数值形式,其可以表示的日期范围从 100 年 1 月 1 日到 9999 年 12 月 31 日,而时间可以从 0:00:00 到 23:59:59.任何可辨认的文本日期都可以赋值给 Date 变量.日期文字须以数字符号 (#) 扩起来,例如,#January 1, 1993# .

日期型变量或常量可以用一个双精度浮点数表示,其中整数部分表示从1899-12-30到该时间的天数(1899-12-30以前的日期则用负数表示),小数部分则是从午夜起到该时间所经过的秒数占全天时间的比例.比如当前时间是2012-5-5 17:35:50,用数字表示就是41034.7332175926,其中41034表示2012-5-5和1899-12-30相差41034天0.7332175926表示17:35:50这个时刻在24小时中处在73.32175926%的位置

日期类型数据需用#号括起来,格式为:#月/日年#.如:#01/01/2013# 已经是最好的答案了,绝对不会错!

Private Sub Form_Load()Label2.Caption = DateEnd Sub这样就能显示日期了Private Sub Form_Load()Label2.Caption = DateIf Text1.Text = Label2.Caption ThenEndEnd IfEnd Sub这样就能在特定的日期结束程序了,前提条件是程序必须运行着

日期型变量的定义与赋值:Dim s As Dates=#2010-2-2 8:00:00#日期型常量是用#号包围的,上面的日期在VB中会自动转换成#2/2/2010 8:00:00 AM# '月/日/年 时:分:秒

可以的如下代码,显示两个日期中的较大的一个 dim d1 as date, d2 as date d1=#23/06/2011# d2=#01/07/2011# select case datediff("d",d1,d2) case is<0 print d1 case 0 print "两个日期相同" case is>0 print d2 end select

两端用#.

网站首页 | 网站地图
All rights reserved Powered by www.ntjm.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com