单项选择题

在窗体上有一个命令按钮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
打开窗体运行后,单击命令按钮,消息框中输出的结果是( )。

A.1
B.2
C.10
D.11
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Command1 Click() Dim y As Integet y=0 Do y=Inout Box(’y=’) If(y Mod 10)+Int(y 10)=10 Then Debug.Print y; LoopUntil y=0 End Sub 打开窗体运行后,单击命令按钮,依次输入10、37、50、55、64、20、28、19、-19、0,则窗口上输出的结果是( )。
A.37 55 64 28 19 19
B.10 50 20
C.10 50 20 0
D.37 55 64 28 19
单项选择题
在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Command1_Click() Dim x As Integer,y As Integer x=12:y=32 Call Proc(x,y) Debug.Print x;y End Sub Public Sub proc(n As Integer,ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub 打开窗体运行后,单击命令按钮,窗口上输出的结果是( )。
A.2 32
B.12 3
C.2 2
D.12 32
相关试题
  • 若要求在文本框中输入文本时达到密码“*”...
  • 在学生管理的关系数据库中,存取一个学生信...
  • 下列属于通知或警告用户的命令是( )。
  • 软件按功能可以分为:应用软件、系统软件和...
  • 利用对话框提示用户输入查询条件,这样的查...