更多"在窗体中添加一个命令按钮,编写如下程序: Private Sub T"的相关试题:
[单项选择]在窗体中添加一个命令按钮,编写如下程序:
Private Sub Test(p,m,n)
p=p+1:m=m+1:n=n+1
Print "Sub: ";p;m;n
End Sub
Private Sub Command1.Click( )
a1=1:b=2:c1=3
Call Test((a,b1+3,(c1))
Print "Main:";a1;b1;c1
End Sub
程序运行后,输出结果为
[单项选择]在窗体中添加一个命令按钮和一个文本框,并编写如下程序代码:
Private Sub Command1_Click( )
k = 0
Do While k < 70
k = k + 2
k = k * k + k
a = a + k
Loop
Text1.Text = a
End Sub
程序运行后,文本框中显示________。
(A) 20
(B) 32
(C) 44
(D) 78
[填空题]在窗体中添加一个命令按钮,然后编写如下代码:
Private Sub Command1_Click( )
a=InputBox("请输入一个整数")
b=InputBox("请输入一个整数")
Print Val(a)+Val(b)
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入21和45,输出结果为 【10】 。
[填空题]在窗体中添加一个命令按钮,然后编写如下代码:
Private Sub Command1_Click( )
a=InputBox("请输入一个整数")
b=InputBox("请输入一个整数")
Print Val(a)+Val(b)
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入21和45,输出结果为 【10】 。
[单项选择]在窗体上添加一个命令按钮,然后编写如下事件过程: Phvate Sub Commanl_Click( ) Dima(10)As Integer Dimp(3)As InteSer k=5 Fori=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) Nexti Fori=1 To 3 k=k+p(i)*2 Nexti Printk End Sub 该程序的运行结果为( )。
A. 35
B. 33
C. 31
D. 29
[填空题]在窗体上添加一个命令按钮Command1,然后编写如下事件过程。
Private Sub Command1_Click( )
Dim b,k
For k=1 To 6
b=23+k
Next k
MsgBox k+b
End Sub
打开窗体后,单击命令按钮,消息框数据的结果是______。
[单项选择]在窗体中添加一个命令按钮,然后编写如下代码:
Private Sub Command1_Click( )
For i=l To 4
x=4
For j=1 To 3
x=3
For k=l To 3
x=x+6
Next k
Next j
Next i
Print x
End Sub
程序运行后,单击命令按钮,输出结果是
A. 7
B. 15
C. 21
D. 538
[填空题]在窗体上添加一个命令按钮,编写如下事件过程:
Private Sub Command1_Click( )
sum=0
For i=3 To 7
sum=i+2
Next i
MsgBox sum+i
End Sub
运行窗体后,单击命令按钮,消息框的输出结果是______。
[单项选择]在窗体中添加一个命令按钮,编写如下程序:
Private Sub Sub1(p,m,n)
p=p+1:m=m+1:n=n+1
Print "sub1:";p;m;n
End Sub
Private Sub Command1_Click( )
a1=1:b=2:c1=3
Call Sub1(a,b1+3,c1)
Print"Main:";a1;b1;c1
End Sub
程序运行后,输出结果为
[填空题]在窗体上添加一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
sum=0
For i=3 To 7
sum=i+2
Next i
MsgBox sum+i
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是______。
[填空题]在窗体上添加一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
Sum =0
For i=3 T0 7
Sum =i+2
Next i
MsgBox sum+i
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是______。
[填空题]在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码:
Private Sub Command1_Click( )
Static b As Integer
b=b+l
End Sub
窗体打开运行后,三次单击命令按钮后,变量b的值是 【11】 。
[填空题]在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1_Click( )
sum=0
For i=1 To 100 step 2
sum=sum+1
Next i
MsgBox sum
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为______。