单项选择题
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim I,Num Randomize Do ForI=1 To 1000 Num=Int(Rnd*100) Print Num; SelectCase Num Case 12 Exit For Case 58 Exit Do Case 65,68,92 End End Select Next I Loop End Sub 上述事件过程执行后,下列描述中正确的是
A.Do循环执行的次数为1000次
B.在For循环中产生的随机数小于或等于100
C.当所产生的随机数为12时结束所有循环
D.当所产生的随机数为65、68或92时窗体关闭、程序结束
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
单击命令按钮时,下列程序代码的运行结果为( )。Private Sub Command1_Click()print MyFunc(20,18)End SubPublic Function MyFunc (m As Integer,n As Integer)As IntegerDo While m <>nDo While m > n:m=m - n:LoopDo While m < n:n=n - m:LoopLoopMyFunc=mEnd FunCtion
A.0
B.2
C.4
D.6
点击查看答案&解析
单项选择题
在窗体上画 1 个文本框,其名称为 Text1,然后编写如下过程: Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode)End SubPrivate Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2)End Sub 程序运行后,把焦点移到文本框中,此时如果敲击 A 键,则输出结果为______。
A.A
B.A
C.A
D.A
点击查看答案&解析
相关试题
阅读程序:Option Base 1Dim arr() ...
假定在窗体(名称为Form1)的代码窗口中定...