更多"[单选题]第265题 （1.0分）在窗体上面一个命令按钮,名称为Com"的相关试题:
[单选题]在窗体上面一个命令按钮,名称为Command1,单击命令按钮时,执行如下事件过程:
Private Sub Command1_Click()
A$=""software andhardware""
B$=Right(a$,8)
C$=Mid(a$,1,8)
MsgBox a$,,b$,c$,1
End Sub
则在弹出信息框的标题栏中显示的信息是().
A.software and hardware
B.software
C.hardware
D.1
[单选题]第265题 （1.0分）
在窗体上面一个命令按钮,名称为Command1,单击命令按钮时,执行如下事件过程.
Private Sub Command1_Click()
A$=""software andhardware""
B$=Right(a$,8)
C$=Mid(a$,1,8)
MsgBox a$,,b$,c$,1
End Sub
则在弹出信息框的标题栏中显示的信息是().
A.software and hardware
B.software
C.hardware
D.1
[单选题]题 （1.0分）
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序.
Private Sub Command1_Click()
Dim x,y,z As Integer
X=5
Y=7
Z=0
Text1.Text=" "
Call Pl(x,y,z)
Textl.Text=Str(z)
EndSub
Sub Pl(ByVal a As Integer,ByVal b As Integer,c As Integer)
C=a+b
End Sub
程序运行后,如果单击命令按钮,则在文本框中显示的内容是().
A.0
B.12
C.Str(z)
D.没有显示
[单选题]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,
然后编写如下程序:
Private Sub Command1_Click()
Dim x, y, z As Integer
X = .
Y = .
Z = .
Text1.Text = ""
Call P1(x, y, z)
Text1.Text = Str(x) & Str(z)
End Sub
Sub P1(ByVal a As Integer, ByVal b As Integer, c As Integer)
A=a+.b=b+.
C = a + b
End Sub
程序运行后,如果单击命令按钮,则在文本框中显示的内容是().
A.5 1.
B.6 1.
C.5 .
D.6 .
[单选题]在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim array1(10,10) As Integer
Dim i,j As Integer
For i=1 To 3
For j=2 T0 4
Array1(i,j)=i+j
Next j
Next i
Text1.Text=array1(2,3)+array1(3,4)
End Sub
程序运行后,单击命令按钮,在文本框中显示的值是().
A.1.
B.1.
C.1.
D.1.
[单选题]在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1_Click()
For I=1 To 4
For J=0 To I
Print Chr$(65+i);
Next J
Print
Next I
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是().
A.BB CCC DDDD EEEEE
B.A BB CCC DDDD
C.B CC DDD EEEE
D.AA BBB CCCC DDDDD
[单选题]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Option Base 1
Private Sub Command1_Click()
K = 4
If x < 3 Then Print k + 3;
If x < 4 Then Print k + 4;
If x < 5 Then Print k + 5;
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是().
A.6 7 8 9
B.7 8 9
C.8 9
D.9
[单选题]在窗体上画一个名称为command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim X AS Integer, n AS Integer
N = 0
DO
N = n + 2
X = X + n
Loop While n < 10
Print X
End Sub
程序运行后,单击命令按钮,则立即窗口中显示的内容是().
A.2
B.10
C.12
D.30
[单选题]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim n AS Integer
N = 0
For I= 25 To 5 Step - 5
N = n + 1
Next I
Print n
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是().
A.5
B.4
C.15
D.210
[单选题]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_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
Print x
End Sub
程序运行后,单击命令按钮,输出结果是().
A.7
B.15
C.157
D.538
[单选题]题 （1.0分）
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序.
Option Base 1
Private Sub Command1_Click()
Dim a As Variant
A = Array(1, 2, 3, 4, 5)
Sum = 0
For i = 1 To 5
Sum = Sum + a(i)
Next i
X = Sum / 5
For i = 1 To 5
If a(i) > x Then Print a(i);
Next i
End Sub
程序运行后,单击命令按钮,在窗体上显示的内容是().
A.1 2
B.1 2 3
C.3 4 5
D.4 5
[单选题]题 （1.0分）
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程.
Private Sub Command1_Click()
Static x As Integer
Cls
Y = y + 2
X = x + 2
Print x, y
End Sub
程序运行后,连续四次单击Command1按钮后,窗体上显示的是().
A.8 8
B.8 2
C.2 8
D.2 2
