网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
( 35 )在窗体中添加一个名称为 Command1 的命令按钮,然后编写如下程序:
Public x As Integer
Private Sub Command1_Click( )
x = 10
Call s1
Call s2
MsgBox x
End Sub
Private Sub s1( )
x = x + 20
End Sub
Private Sub s2( )
Dim x As Integer
x = x + 20
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为
A ) 10
B ) 30
C ) 40
D ) 50
参考答案
更多 “ ( 35 )在窗体中添加一个名称为 Command1 的命令按钮,然后编写如下程序:Public x As IntegerPrivate Sub Command1_Click( )x = 10Call s1Call s2MsgBox xEnd SubPrivate Sub s1( )x = x + 20End SubPrivate Sub s2( )Dim x As Integerx = x + 20End Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为A ) 10B ) 30C ) 40D ) 50 ” 相关考题
考题
在窗体上添加一个名称为Command1的命令按钮,然后编写如下程序:Private Sub f(ByVa1 x As Integer)x=x+4End SubPrivate Sub Command1_Click()i=3Call f(1)If i>4 Then i=i*2MsgBox iEnd Sub打开窗体运行后,单击命令按钮,则消息框的输出结果为______。
考题
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As String, c As Integer a=1234: b=Str(a)c=Len(b)Print c End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。A.0B.5C.6D.7
考题
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_Click()Dim s,iFor i=1 To 10s=s+iNext iMsgBox sEnd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为 。
考题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:Private Sub f(ByVal x As Integer)x=x+4End SubPrivate Sub Command1_Click()i=3Call f(i)If i>4 Then i=i*2End Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
考题
在窗体上添加一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_Click()sum=0For i=1 To 100 step 2sum=sum+iNext iMsgBox sumEnd Sub打开窗体运行后,单击命令按钮,则消息框的输出结果为_______。
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Private Sub Commandl_Click( )Static X As IntegerStatic Y As IntegerClsY=1Y=Y+5X=5+XPrint X, YEnd Sub程序运行时,3次单击命令按钮Command1后,窗体上显示的结果为【 】。
考题
在窗体上添加一个命令按钮(名为Command1),然后编写如下程序:Private Sub Command1_Click()Dim a As Integer,b As Integerx=10y=20End Sub打开窗体运行后,单击命令按钮,消息框的输出结果为( )。
考题
在窗体上添加一个名为Command1的命令按钮,然后编写如下程序:Function m(x As Integer, y As Integer) As Integerm=IIf(xy,x,y)End FunctionPrivate Sub Command1_Click()Dim a As Integer, b As Integera=1b=2MsgBox m(a,b)End Sub打开窗体运行后,单击命令按钮,消息框中输出结果为【 】。
考题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MSgBox x End Sub Private Sub s1() x=x+20 End Sub Private Sub s2() Dim x As Integer x=X+20 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为______。A.10B.30C.40D.50
考题
在窗体中添加一个命令按钮,名称为Command1;添加一个文本框,名称为Text1,然后编写如下程序: Private Sub Commandl Click() Dim a(5), b(5) For j = 1 To 4 a(j) = 3 ( j b(j) = a(j) ( 3 Next j Text1.Text = b(j\2) End Sub 程序运行后,单击命令按钮,在文本框中显示A.25B.18C.36D.35
考题
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序: Public x As Integer Private Sub Commandl_click() x=10 Call s 1 Call s 2 MsgBOx x End Sub Pfivate Sub s1() x=x+20 End Sub Private SubA.10B.30C.40D.50
考题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:Functionfun(xAsInteger)Staticzy=y+1:z=z+1fun=x+y+zEndFunctionPrivateSubCommand1_Click()DimxAsIntegerx=1Fori=1To2Printfun(x)NextiEndSub程序运行后,如果单击命令按钮,窗体中显示的内容是( )
A、33B.34C.3D.3
考题
在窗体中添加一个命令按钮,名称为Command1;添加一个文本框,名称为Textl,然后编写如下程序: Private Sub Command1_Click( ) Dima(5),b(5) Forj:1 T04 s(j)=3*j b(j)=a(j)*3 Next j Textl.Text=b(j\2) End Sub 程序运行后,单击命令按钮,在文本框中显示A.25B.18C.36D.35
考题
在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer If a=0 Then x=x-1 Else If b<>0 Then End If End If If c<>0 Then x=3 Else x=4 End If Print x End Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.34B.4C.35D.3
考题
在窗体上添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() A=75 If A<60 Then x=1 If A<70 Then x=2 If A<80 Then x=3 If A<90 Then x=4 MsgBox x End Sub 打开窗体运行后,单击命令按钮,则消息框的输出结果是( )。A.1B.2C.3D.4
考题
在窗体上添加一个命令按钮(名为Command1),然后编写如下程序:Function m(x as Integer,y as Integer) as Integerm=IIf(x>y,x,y)End FunctionPrivate Sub Commandl Click()Dim a as Integer,b as Integera=1b=2MsgBox m(a,B)End Sub打开窗体运行后,单击命令按钮,消息框的输出结果为【 】。
考题
( 11 )在窗体中添加一个命令按钮,名称为 Command1 ,然后编写如下程序:Private Sub Command1_Click()Dim s , iFor i=1 To 10s=s+iNext iMsgBox sEnd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为 【 11 】 。
考题
( 11 )在窗体中添加一个命令按钮(名称为 Command1 ),然后编写如下代码:Private Sub Command1_Click( )Static b As Integerb=b+1End Sub窗体打开运行后,三次单击命令按钮后,变量 b 的值是 【 11 】 。
热门标签
最新试卷