选择题 39. 在窗体上有一个命令按钮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。