更多"在窗体上添加一个命令按钮(名为Command1),然后编写如下程序。 "的相关试题:
[填空题]在窗体上添加一个命令按钮(名为Command1),然后编写如下程序,
Function m(x as Integer,y as Integer)as Integer
m=If(x>y,x,y)
End Function
Private Sub Cununandl_Click( )
Dim a as Integer,b as Integer
a=1
b=2
MsgBoxm(a,b)
End Sub
打开窗体运行后,单击命令按钮,消息框的输出结果为______。
[填空题]在窗体上添加一个命令按钮(名为Command1),然后编写如下程序:
Function m(x As Integer, y As Integer) As Integer m = IIf(x > y, x, y)
End Function
Private Sub Command1_Click( ) Dim a As Integer, b As Integer a = 1
b = 2
MsgBox m(a, b) End Sub
打开窗体运行后,单击命令按钮,消息框中输出结果为_________。
[填空题]在窗体上添加一个命令按钮(名为Command1),然后编写如下程序:
Function m(x as Integer,y as Integer) as Integer
m=IIf(x>y,x,y)
End Function
Private Sub Commandl Click( )
Dim a as Integer,b as Integer
a=1
b=2
MsgBox m(a,B)
End Sub
打开窗体运行后,单击命令按钮,消息框的输出结果为 【12】 。
[填空题]在窗体上添加一个命令按钮(名为Command1),然后编写如下程序:
Function m(x as Integer,y as Integer) as Integer
m=IIf(x>y,x,y)
End Function
Private Sub Command1_Click( )
Dim a as Integer,b as Integer
a=1
b=2
MsgBox m(a,b)
End Sub
打开窗体运行后,单击命令按钮,消息框的输出结果为 【12】 。
[单项选择]在窗体上添加一个命令按钮(名为Conunand1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码:
Private Sub Command1_Click( )
m=2170
n=Len (Str$ (m) +Space (5))
Me! 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))
Mc! Text1=n
End Sub
打开窗体运行后,单击命令按钮,在文本框中显示( )。
A. 5
B. 8
C. 9
D. 10
[单项选择]在窗体上添加一个命令按钮,名为Command1,然后为该命令按钮编写如下事件过程,该过程执行结果为______。
Option Base 1
Private Sub Cemmand1_Click( )
Dim a As Variant
a = Array(1, 2, 3, 4)
j = 1
for i = 4 To 1 Step - 1
s = s+ a(i)* j
j= j* 10
Next i
Print s
End Sub
A. 4321
B. 1234
C. 34
D. 12
[单项选择]在窗体上添加一个命令按钮(名为Commandl) ,然后编写如下事件过程:
Private Sub Commandl_click( )
For i=1 To 4
x=4
For j=1 To 3
x=3
For k=1 To 2
x=x+6
Next k
Next j
Next i
MsgBox x
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是( )。
A. 7
B. 15
C. 157
D. 528
[填空题]在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件过程:
Private Sub Command 1_Click( )
Dim b,k
For k=1 to 6
b=23+k
Next k
MsgBox b+k
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是______。
[填空题]在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:
Private Sub Command1_Cliek
Dim b, k
For k = 1 to 6
b=23+k
Next k
MsgBox b + k
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是 【15】 。
[填空题]在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:
Private Sub Command1 Click( )
Dim b,k
For k=1 to 6
b=23+k
Next k
MsgBox b+k
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是 [15] 。
[填空题]在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:
Private Sub Command1_Click( )
Dim b,k
Fork=1 to 6
b=23+k
Next k
MsgBoxb+k
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是 【15】 。
[填空题]在窗体上添加一个命令按钮(名为Cmd),然后编写如下事件过程:
Private Sub Cmd_Click( )
Dim sum,k
For k=1 to 6
sum=30+k
Next k
MsgBox sum+k
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是 【12】 。