单选题在窗体上有一个命令按钮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 打开窗体运行后，单击命令按钮，消息框中输m的结果是（）。

A、 1
B、 2
C、 10
D、 11

【正确答案】 B

【答案解析】 [解析] 函数DateDiff按照指定类型返回指定的时间间隔数目。语法为DateDiff(＜间隔类型＞，＜日期1＞，＜日期2＞，[W1][W2])，间隔类型为“ww”，表示返回两个日期间隔的周数。