单项选择题

在窗体上有一个命令按钮Command1,编写事件代码如下:
Prirate 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和一个文本框Text1,编写事件代码如下: Private Sub Command1_Click() Dim i,j,x For i=1 To 20 Step 2 x=0 For j-i To 20 Step 3 x=x+1 Next j Next i Text1.Value=Str(x) End Sub打开窗体运行后,单击命令按钮,文本框中显示的结果是
A.1
B.7
C.17
D.400
单项选择题
在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Command1_Click() Dim y As Integer y=0 Do y=InputBox( y= ) If(y Mod 10)+Int(y 10)=10 Then Debug.Print y; Loop Until 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
相关试题
  • Access中,设置为主键的字段
  • 能够实现从指定记录集里检索特定字段值的函数是
  • 下列关于对象“更新前”事件的叙述中,正确的是
  • 下列关于关系数据库中数据表的描述,正确的是
  • 软件生命周期可分为定义阶段、开发阶段和维...