问题:
[单选] 在窗体上有一个命令按钮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
问题:
[单选] 在窗体上有一个命令按钮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。
VIP截止日期:2024-12-31 04:03:20
←请使用支付宝扫码支付VIP截止日期:2024-12-31 04:03:20
←请使用微信扫码支付