填空题

下列程序段用于实现以下功能：随机产生一个100以内的整数，从键盘上输入一个数，计算机提示输入的数是否与随机整数一样。请填空。
Private Sub Command1_Click()
RANDOMIZE
a = 【1】
Do
Input "请输入一个数字:", n
If n = a Then
Print "Good!"
【2】
ElseIf n＞a Then
Print "大了"
Else
Print "小了"
End If
Loop
End Sub

【参考答案】

Int(100*Rnd) Exit Do

<上一题目录下一题>

热门试题

填空题

下面程序段的作用：在窗体上一个命令按钮。单击命令按钮后，将程序中字符串 Welcome Home 中的字符全部大写输出，其后字符 Wel Back 全部小写输出。请填空。 Private Sub Command1_Click() a = Welcome Home ; b = Wel Back c = 【8】 + LCase(b) Print c End Sub

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序 _______。 Dim k As Integer Private Sub Form_Load() k=5 End Sub Private Sub Command Click() Static b As Integer b ＝ b + k k=k+1 Print k，b End Sub 程序运行时，两次单击命令按钮Command1后，在窗体上显示的第二行是 _______。

A．7 11
B．5 11
C．76
D．2 1

相关试题