单项选择题
在窗体上有一个命令按钮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
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
一个队列的初始状态为空。现将元素A、B、C、D、E、F、5、4、3、2、1依次入队,然后依次退队,则元素退队的顺序为______。
点击查看答案&解析
单项选择题
在窗体上有一个命令按钮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
点击查看答案&解析
相关试题
数据库中有工资表,包括“姓名”、“工资”...
以下程序的功能是在立即窗口中输出100~...
下列程序的功能是找出被5和7除余数为1的...
在窗体上有一个命令按钮Command1,编写事...
在窗体文本框Text 1中输入“456AbC”...