设有命令按钮Command1的单击事件过程,代码如下: Private Sub Command1_Click() Dim a(30) As Integer For i=1 To 30 a(i)=Int(Rnd*100) Next For Each arrItem In a If arrItem Mod 7=0 Then Print arrItem If arrItem>90 Then Exit For Next End Sub 对于该事件过程,以下叙述中错误的是______。
A.a数组中的数据是20个100以内的整数
B.语句For Each arrItem In a有语法错误
C.If arrItem Mod 7=0……语句的功能是输出数组中能够被7整除的数
D.If arrItem>90……语句的作用是当数组元素的值大于90时退出For循环
第1题:
设有命令按钮Command1的单击事件过程,代码如下,请填空。
Private Sub Command1_Click()
Dim a(30) As Integer
For i=1 To 30
a(i) =i
Next
For Each arrItem______a
If arrItem Mod 7=0 Then Print arrItem;
If arrItem>90 Then Exit For
Next
End Sub
第2题:
设有命令按钮Commandl的单击事件过程,代码如下:运行程序,单击命令按钮,消息框输出结果是( )。
A. 7
B. 8
C. 15
D. 22
第3题:
设有一个命令按钮Command1的事件过程以及一个函数过程,程序如下:
Private Sub Command1_Click()
Static x as integer
X=f(x+5)
Cls
Print x
End Sub
Private function f(x as integer)as integer
F=x+x
End function
连续单击命令按钮3次,第3次单击命令按钮后,窗体上显示的计算结果是
A)10
B)30
C)60
D)70
第4题:
在窗体中有一个名为(Command1的命令按钮,Click事件的代码如下:
单击命令按钮后,标签显示的结果是( )。
第5题:
设有如下通用过程:在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如 下事件过程:End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是( )。
A. 30
B. 25
C. 20
D. 15
第6题:
设有一个命令按钮Command1的事件过程以及一个函数过程。程序如下: Private Sub Command1 Click( ) Static x A S Integer x=f(x+5) Cls Print X End Sub Private Function f(x As Integer)As Integer f=x+x End Function 连续单击命令按钮3次,第3次单击命令按钮后,窗体显示的计算结果是( )。
A.10
B.30
C.60
D.70