更多"在窗体中添加一个命令按钮(名为Command1),然后编写如下代码:
"的相关试题:
[单项选择]在窗体中添加一个命令按钮(名为Command1),然后编写如下代码:
Public x as integer
Private Sub Command1_Click( )
a=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
[单项选择]在窗体中添加一个命令按钮(名为Command1) 和一个文本框(名为Text1) ,并在命令按钮中编写如下事例代码:
Private Sub Command1_Click( )
Str1="981765"
Str2="65"
n=InStr(Str1,Str2)
Me.Text1=n
End Sub
窗体打开运行后,单击命令按钮,在文本框中显示______。
A. 4
B. 5
C. 6
D. 7
[单项选择]在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码:
Private Sub Command1_Click( )
m=2.17
n=Len(Str$(m)+Space(5))
Mc! Text1=n
End Sub
打开窗体运行后,单击命令按钮,在文本框中显示( )。
A. 5
B. 8
C. 9
D. 10
[单项选择]在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事例代码:
Private Sub Command1 Click( )
m=2.17
n=Len(Str $(m) +Space(5) )
Me.Text1=n
End Sub
窗体打开运行后,单击命令按钮,在文本框中显示______。
A. 5
B. 8
C. 9
D. 10
[单项选择]在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Public x As integer
Private Sub Command1_Cliek( )
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
[单项选择]在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Public x As Integer
Private Sub Commandl Click( )
x=10
Call sl
Call s2
MsgBox x
End Sub
Private Sub sl( )
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
[填空题]在窗体中添加一个命令按钮(名为Command1) 和一个文本框(名为text1) ,然后编写如下事件过程:
Private Sub Command1_C1ick( )
Dim x As Integer, y As Integer, z As Integer
x=5:y=7:z=0
Me!Text1=""
Call p1(x,y,z)
Me!Text1=z
End Sub
Sub p1(a As Integer,b As Integer,c As Integer)
C=a+b
End Sub
打开窗体运行后,单击命令按钮,文本框中显示的内容是______
[填空题]在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件过程:
Private Sub Commandl_Click( )
Dim b,k
For k=1 to 6
b=23+k
Next k
MsgBox b+k
End Sub
打开窗体运行后,单击命令按钮,消息框的输出结果是【 】。
[填空题]在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Public x As Integer
Private Sub Command1______Click( )
x=3
Call f1
Call f2
MsgBox x
End Sub
Private Sub f1( )
x=x*x
End Sub
Private Sub f2( )
Dim x As Integer
x=x+4
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
[单项选择]在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Public x As Integer
Private Sub Command1_Click( )
x=10
Call s1
Call s2
MsgBox x
End Sub
Private Sub sl( )
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