Date 数据类型Date 变量存储为 IEEE 64 位（8 个字节）浮点数值形式，其可以表示的日期范围从 100 年 1 月 1 日到 9999 年 12 月 31 日，而时间可以从 0:00:00 到 23:59:59。任何可辨认的文本日期都可以赋值给 Date 变量。日期文字须以数字符号 (#) 扩起来，例如，#January 1, 1993# 或 #1 Jan 93#。
Date 变量会根据计算机中的短日期格式来显示。时间则根据计算机的时间格式（12 或 24 小时制）来显示。
当其他的数值类型要转换为 Date 型时，小数点左边的值表示日期信息，而小数点右边的值则表示时间。午夜为 0 而中午为 0.5。负整数表示 1899 年 12 月 30 日之前的日期。
1、启动visual basic6，执行文件-新建工程命令，在弹出的对话框中选择标准exe文件后点击确定。
2、拖拽窗体周围的小正方形调节窗体的大小，修改borderstyle属性值为0-none，startupposition属性值为屏幕中心。
3、选择工具箱里标签工具，在窗体上创建两个标签控件，一个label1一个label2，修改两个标签控件的caption属性值为空。
4、分别选择工具箱里触发器和按钮控件，在窗体上创建commmand1和timer1对象。并修改commmand1的caption属性值为退出。
5、双击窗体进入代码区域，输入代码 Timer1.Interval = 1000 Timer1.Enabled = True
6、接着双击timer1控件，进入触发器代码区域输入代码： Label2.Caption = "今天是：" & Date Label1.Caption = "现在是：" & Format(Now, "AMPM(hh:mm:ss)")
7、接着双击commmand1控件进入代码区域输入代码为end，即为退出程序。
8、点击工具栏里的启动按钮，进行代码调试，根据错误提示修改代码直至无误为止。接着保存即可。
