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