在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Commandl_Click() Dim dl As Date Dim d2 As Date d1=#12/25/2009# d2=

admin2016-08-22  18

问题 在窗体上有一个命令按钮Command1,编写事件代码如下:
    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

解析 函数DateDiff按照指定类型返回指定的时间间隔数目。语法为DateDiff(<间隔类型>,<日期1>,<日期2>,[,W1][,w2]),问隔类型为“ww”,表示返回两个日期间隔的周数。
转载请注明原文地址:https://kaotiyun.com/show/j8BD777K
0

最新回复(0)