更多"编写如下程序: Private Sub Command1_Click"的相关试题:
[单项选择]在窗体上画一个命令按钮,然后编写如下程序
Private Sub Command4 Click( )
Dim a As Integer,b As Integer
a=1
b=2
Print N(a,b)
End Sub
Function N(x As Integer,y As Integer)As Integer
N=IIf(x>y,x,y)
End Function
程序运行后,单击命令按钮,输出结果为( )。
A. l
B. 2
C. 5
D. 8
[单项选择]下列程序
Private Sub Command1_Click( )
x = "abcd"
y = "1234"
For i = 1 To 4
z = z + Mid(x, i, 1)+ Left(y, 1)
Next i
Print z
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是________。
A. abcd1234
B. a1b2c3d4
C. a1b1c1d1
D. 1234abcd
[单项选择]编写如下程序:
Private Sub Form Click( )
a$=: "4321": b$="abcd"
For 3=1 To 4
Print Mid$(a$,5-j,1)+Nid$(b$, j, 1);
Next j
Print
End Sub
程序运行后,单击窗体,其输出结果为 ______。
A. alb2c3d4
B. b4c3d2el
C. eld2c3b4
D. la2b3c4d
[单项选择]在窗体上画一个命令按钮,然后编写如下程序:
Private Sub Comrnand3_Click( )
Cop 2
Cop 3
Cop 4
End Sub
Sub Cop (a As Integer)
Static x As Integer
x=x + a
Print x;
End Sub
程序运行后,单击命令按钮,输出结果为( )。
A. 内联函数
B. 重载函数
C. 递归函数
D. 嵌套函数
[单项选择]在窗体中添加一个命令按钮,并编写如下程序:
Private Sub Command1_ Click( )
x=1: y=2: z=3
x=y: y=z: z=x
End Sub
程序执行后,输出的结果是______。
A. 3
B. 0
C. 2
D. 1
[单项选择]在窗体中添加一个名称为Commandl的命名按钮,然后编写如下程序:
Private Sub Command1 Click( )
Print Tab(1);“第一”
Print Tab(6);“第二”
End Sub
程序运行后,如果单击命令按钮,在窗体上显示的内容是(口表示空格)
A. 第一□□第二
B. 第一第二□□
C. 第一□□
D. 第一□□
[单项选择]在窗体中添加一个命令按钮,名称为Commandl,然后编写如下程序: 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. 0
B. 5
C. 6
D. 7
[单项选择]下列程序
Private Sub Command1_Click( )
x="abcd"
y="1234"
For i=1 To 4
z=z+Mid(x,i,1)+Left(y,1)
Next i
Print z
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是______。
A. abcd1234
B. a1b2c3d4
C. a1b1c1d1
D. 1234abcd
[单项选择]在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1_Click( )
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
[单项选择]在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1_Click( )
Dim a As Integer, b As String, c As Integer
a=1234: b=Str(
[单项选择]在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1_Click( )
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
[单项选择]在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click( ) Static a AS Integer Static b As Integer Cls b=2 b=b+2 a=3+a Print a,b End Sub 程序运行后,三次单击该命令按钮,此时窗体上显示的结果是______。
A. 3 5
B. 6 6
C. 3 3
D. 9 4