更多"在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序:
"的相关试题:
[填空题]在窗体上画一个命令按钮,然后编写如下代码:
Private Sub Commandl_Click( )
Dim M(10) As Integer
For k=1 To 10
M(k)=12-k
Next k
x=6
Msgbox M(2+M(x))
End Sub
程序运行后,单击命令按钮,消息框显示的是 。
[填空题]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Commandl Click( )
Do Until b<0
a=InputBox("输入a的值")
a=Val(a)
b=InputBox("输入b的值")
b=Val(b)
a=a +b
Loop
Print a
End Sub
程序运行后,依次输入5,4,3,2,1,0,-1,-2,则输出结果是 【14】 。
[单项选择]在窗体上画一个命令按钮,然后编写如下程序:
Private Sub Commandl_Click( )
Dim a AS Integer,b As Integer
a=15
b=2
t N(a,b)
End Sub
Function N(x As Integer,y As Integer) As Integer
N=IIf(x)y,x,y)
End Function
程序运行后,单击命令按钮,输出结果为
A. 1
B. 2
C. 15
D. 8
[填空题]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Commandl_Click( )
Do Until b【14】。
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click( ) Dim m As Integer, n As Integer, p As Integer m=3: n=5: p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )
A. 4
B. 6
C. 8
D. 10
[单项选择]在窗体上画一个命令按钮,名称为Commandl。然后编写如下程序:
Private Sub Command1_Ctick( )
For I=1 TO 2
For J=1 TO I
Print String(I,"Hello");
Next J
Print
Next I
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是
A. H
B. H
C. HHHHH
D. H
[填空题]在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:
Private Sub Commandl_click( )
Dim i As Integer,x As Integer
For i=1 To 6
If i=1 Then x=i
If i<=4 Then
x=x+1
Else
x=x+2
End If
Next i
MsgBox x
End Sub
程序运行后,单击命令按钮,其输出结果为______。
[填空题]在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:
Private Sub Commandl_Click( )
DimM(10)As Integer
Fork=1 To 10
M(k)=12-k
Nextk
x=6
PrintM(2+M(x))
End Sub
程序运行后,单击命令按钮,输出结果是______。