在窗体上有一个命令按钮Commandl,编写事件代码如下:Private SuB commandl_Click()Dim d1 As Date

在窗体上有一个命令按钮Commandl，编写事件代码如下：

Private SuB commandl_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表示两个指定日期间的时间间隔数目，参数ww要求返回值为两日期间的周数。