问题
单项选择题
在窗体上有一个命令按钮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
解析： DateDiff(timeinterVal，date1，date2[，firstdayofweek[，firstweekofyear]])返回的是两个日期之间的差值，timeinterval表示相隔时间的类型，ww表示几周；而日期的d1和d2相差两周，故输出2。