问题
单项选择题
在窗体上有一个命令按钮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
打开窗体运行后,单击命令按钮,消息框中输出的结果是______。
A.1
B.2
C.10
D.11
答案
参考答案:B
解析: 函数DateDif/按照指定类型返回指定的时间间隔数目。语法为DateDiff(<间隔类型>,<日期1>,<日期2>,[,W1][,W2]),间隔类型为“ww”,表示返回两个日期间隔的周数。