在窗体上有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl Click(  ) Dim dl As Date Dim d2 As Dated1=#12/25/2009#d2=#1/5/2010#MsgBox DateDiff(”ww”,d1,d2)End Sub打开窗体运行后,单击命令按钮,消息框中输出的结果是(  )。

2023-04-24

[单选] 在窗体上有一个命令按钮Commandl,编写事件代码如下:
Private Sub Commandl Click(  )
Dim dl 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

参考解析:

B。【解析】DateDiff(timeinterval,datel,date2[,firstdayofweek[,firstweekofyear]])返回的是两个日期之间的差值,timeinterval表示相隔时间的类型,ww表示几周;而日期的dl和d2相差两周,故输出2。

相关推荐