选择题
在窗体上有一个命令按钮Command1,编写事件代码如下:
Private Sub Command1_Click()
Dim d1 As Date
Dim d2 As Date
d1=#12/25/2009#
d2=#1/5/2010#
MsgBox DateDiff('ww',d1,d2)
End Sub
打开窗体运行后,单击命令按钮,消息框中输出的结果是______。
【正确答案】
B
【答案解析】函数DateDiff按照指定类型返回指定的时间间隔数目。语法为DateDiff(<间隔类型>,<日期1>,<日期2>,[,W1][,W2]),间隔类型为“ww”,表示返回两个日期间隔的周数。