关于时间函数的问题

ljeternity

一个窗体中有一个按钮，一个Label
我现在想点击按钮在Label中显示相应的时间，其实，我是以下几个函数不会用，请您举个例子，谢谢：
1、Date()函数
2、Now()函数
3、Time()函数
4、Year(dtDate)函数
5、Month(dtDate)函数
6、Day(dtDate)函数
7、WeekDay(dtDate)函数
8、Hour(dtTime)函数
谢谢，请一样举一个例子，就是可以让点击按钮在Label中显示相应的内容

drbabyhai

Private Sub Command1_Click()
  Label1.Caption = Now
End Sub

不会用就自己写。这么简单的都写不出来。写一个了，后面的自己想办法

ljeternity

那么括号里面的函数怎么用呢？谢谢！

ljeternity

那么现在这几个不会用了，谢谢，请看看：
4、Year(dtDate)函数
5、Month(dtDate)函数
6、Day(dtDate)函数
7、WeekDay(dtDate)函数
8、Hour(dtTime)函数

maggic

怎么说才好呢

4、Year(dtDate)函数
5、Month(dtDate)函数
6、Day(dtDate)函数
7、WeekDay(dtDate)函数
8、Hour(dtTime)函数

dim dt as date
dt=now
msgbox Year(dt) '日期的年部分
msgbox Month(dt)'日期的月部分
msgbox Day(dt)  '日期的日部分
msgbox WeekDay(dt)'这个日期是星期几, 1 星期日/....
msgbox Hour(dt)  '日期的小时部分