单项选择题
在窗体上画一个命令按钮,然后编写如下事件过程: 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
点击查看答案&解析
相关试题
有下面一个程序段,从文本框中输入数据,如...
在窗体上画一个命令按钮和一个文本框,然后...
下列语句的输出结果是【 】。Print Forma...
设有如下程序:Private Sub Form_Click...
在窗体上加上一个文本框控件TextBox,画一...