vb中怎么样分别得到年、月、日

Year(X)，Month(X)，Day(X)：取出年，月，日
[格式]：
P=Year(X)
取出X“年”部分的数值
P=Month(X)
取出X“月”部分的数值
P=Day(X)
取出X“日”部分的数值
[说明]：Year返回的是公元年，若X里只有时间，没有日期，则日期视为#1899/12/30#

刚才试了一下，和ASP里的一样啊
Month(Date) 和 Day(Date)

Private Sub Form_Load()
txt1.Text = Str$(Month(Now)) + "月" + Str$(Day(Now))+"日"
End Sub
显示今天的时间