关于万年历的问题!!

Question

问大家一个问题，请帮帮我！！
假如一个date数据，我想分别获取它们的值，如2005-12-8，我想分别获取2005，12，8。怎么获取。我已经知道获取2005用val，谁能告诉怎样获取另外两个的值？？？？？
如果谁做过万年历的,请把你的方法跟思路些下来,谢谢!!!

Answer 1

用year()、month()、day()函数

Answer 2

MsgBox Year(Now) & "," & Month(Now) & ", " & Day(Now)＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
免费的学习交流网站，欢迎大家访问！
http://www.j2soft.cn/

Answer 3

如果你通过输入字符串型数据做万年历主要是先利用强制转化CDate()函数为Date型,再通过VB几个内函数Year()、Month()、Day()函数以及weekday()函数对该Date型数据自动判断是星期几，你要做的就是判断是否闰年，大小月问题！