请输入或粘贴题目内容
搜题
拍照、语音搜题，请扫码下载APP
题目内容
（请给出正确答案）
窗体上命令按钮Commandl的事件过程如下：
Private Sub Command1_Click()
Dim total As Integer
total=s(1)+s(2)
Print total
End Sub
Private Function s(m As Integer)As Integer
Static x As Integer
For i=1 To m
x=x+1
Next i
s=x
End Function
运行程序，第3次单击命令按钮Command1时，输出结果为【 】。
答案
更多“窗体上命令按钮Commandl的事件过程如下：Private Sub Command1_Click（)Dim total As Integertotal”相关的问题
第1题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。
A．15
B．18
C．21
D．24
第2题
窗体中有命令按钮Commandl，事件过程如下：
PublicFunction f(x As Integer)As Integer
Dim Y AsInteger
X=20
y=2
f= X *Y
End Function
PrivateSub Commandl_Click（）
Dim y As Integer
static x As Integer
x=10
y=5
y=f(x)
Debug.Print x;y
End Sub
运行程序，单击命令按钮，则立即窗口中显示的内容是（）
A.10；5
B.10；40
C.20；5
D.20；40
第3题
A.1
B.7
C.17
D.400
第4题
A.private sub Command1 Click（） Command2．Visible—trueCommand3．Visible—false End Sub
B.private sub Commandl Click（） Command2．Enable—trueCommand3．Enable=falseEnd Sub
C.private sub Command1 Click（） Command2．Enable—trueCommand3．Visible—falseEnd Sub
D.private sub Command1 Click（） Command2．Visible=trueCommand3．Enable—falseEnd Sub
第5题
设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是（）。
A．窗体的Click事件过程的过程名是Myform_Click
B．命令按钮的Click事件过程名是C1_Click
C．命令按钮的Click事件过程的过程名是Command1_Click
D．以上三种过程名称都是错误的
第6题
在窗体上面有一个命令按钮，名称为Command1，单击该命令按钮时，执行如下事件过程：
在弹出信息框的标题栏中显示的信息是（）。
A．softwareand hardware
B．software
C．hardware
D．1
第7题
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click() For i=l To 4 x=4 For j=1 To 3 x=3 Fork=1 To 2 x=x+6 Next k Next j Next i MsgBox x End Sub 打开窗体后，单击命令按钮，消息框的输出结果是()。
A．7
B．15
C．157
D．528
第8题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num As Integer num=1 Do Until num＞6 Print num; num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。
A．13.45.8
B．135
C．1 4 7
D．无数据输出
第9题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是()。
A．4
B．5
C．6
D．7
第10题
Private Sub Commandl Click（）
Dim i As Integer, j As Integer
Dim a （10,10）As Integer
For i=1 To 3
For j= i To 3
a（i,j）=（i-1）*3+j
Print a （i,j）;
Next j
Next i
End Sub
程序运行后，单击命令按钮，窗体上显示的是（）。
第11题
.jpg)
注意：
文件必须存放在考生文件夹中，工程文件名为execise83.vbp，窗体文件名为 execlse83.frm。
