执行以下程序,在窗体上输出()。Private Sub Command1_Click()Dim a(20)As IntegerFor j = 1 T
执行以下程序,在窗体上输出()。
Private Sub Command1_Click()
Dim a(20)As Integer
For j = 1 To 20 Step 2
a(j)= j
Next j
Print a(1)+ a(2)+ a(3)AAAAAAAAa
End Sub
A. 4
B. 5
C. 6
D. 7
执行以下程序,在窗体上输出()。
Private Sub Command1_Click()
Dim a(20)As Integer
For j = 1 To 20 Step 2
a(j)= j
Next j
Print a(1)+ a(2)+ a(3)AAAAAAAAa
End Sub
A. 4
B. 5
C. 6
D. 7
第1题
设置属性的语句格式为( )
A. “对象名.属性名=属性值”
B. “对象名.属性名属性值”
C. “窗体名.属性名=属性值”
D. “窗体名.属性名属性值”
第2题
设有Function过程:
Private Function f(a As Integer, b As Integer) As Integer
a = a * a:
b = b * b
f = CInt(Sqr(a - b))
End Function
则如下程序段的运行结果是( )。
Private Sub Command1_Click()
Dim X As Integer, Y As Integer
X = 5: Y = 4
a = f(X, Y)
Print a
End Sub
A. 5
B. 4
C. 3
D. 9
第3题
计算n!的函数过程如下:
Private Function fact(n As Integer)As Long
f = 1
For i = 1 To n
f = f * i
Next i
(___________________)
End Function
下划线处需要编写的语句是( )。
A. f = 1
B. f = fact
C. fact = f
D. 不需要其他任何语句
第4题
在窗体上画一个List1的列表框,一个名称为Label1的标签,列表框中显示若干个项目,当单击列表框中的某个项目时,在标签中显示被选中的项目的名称,下列能正确实现上述操作的程序是( )。
A) Private Sub List1_Click()
Label1.Caption = List1.ListIndex
End Sub
B) Private Sub List1_Click()
Label1.Name = List1.ListIndex
End Sub
C) Private Sub List1_Click()
Label1.Name = List1.Text
End Sub
D) Private Sub List1_Click()
Label1.Caption = List1.Text
End Sub
第5题
用来设置文本框有无滚动条的属性是( )
A. ScrollBars
B. MultiLine
C. SelText
D. SelLength
第6题
计算z的值,当x大于y时,z=x;否则z=y。下列语句错误的是( )
A. If x>=y Then z=x : z=y
B If x>=y Then z=x Else z=y
C. z=y : If x>=y Then z=x
D. If x<=y Then z=y Else z=x
第7题
运行下列程序段后,j3显示的结果为( )
J1=23
J2=32
j3=j1 & J2
A 3223
B 23
C 55
D 2332
第8题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Sub Command1_Click()
num As Integer
= 1
Until num >6
num;
= num + 2.4
Sub
程序运行后,单击命令按钮,则窗体上显示的内容是( )
A、1 3.4 5.8
B、1 3 5
C、1 4 7
D、无数据输出
第9题
下列程序段运行后,其运行结果是( )。
Dim a(3) As Integer, b(3) As Integer
For k = 0 To 3
a(k) = k*k +k
b(k) = a(k)-k
Next k
Print a(2) + b(1)
A. 5
B. 6
C. 7
D. 8
第10题
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Public x As Integer
Private Sub Command1_Click()
Dim y As Integer
x=10 : y=5
Call f(x, y)
Print x; y
End Sub
Private Sub f(x1 As Integer, y1 As Integer)
x1=x+2
y1=y+2
End Sub
程序运行后,单击命令按钮,在窗体上显示的内容是( )。
A. 10 5
B. 12 7
C. 12 2
D. 以上都不对
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!