UC知道两道VB题目！谁能 讲的详细点
来源：百度知道 编辑：UC知道 时间：2024/05/31 10:35:44
第七部分
1. 以下程序的输出结果是____.
Option Base 1
Private Sub Command1_Click()
Dim a(10) As Integer
k=5
For I=1 To 10
a(i)=I^2
Next I
Print a(I-1)
End Sub
(A) 100 (B) 81 (C) 99 (D) 121
6. 在窗体上添加一命令按钮，然后编写如下事件：
Private Sub Command1_Click()
Dim s(10)
For I=6 To 10
s(i)=Val(InputBox(“Enter:”))
Next I
MsgBox s(5)+s(6)*s(10)
End Sub
程序运行后，单击命令按钮，然后输入1、2、3、4、5，显示结果为____.
(A) 5 (B) 10 (C) 15 (D) 显示出错信息
1. 以下程序的输出结果是____.
Option Base 1
Private Sub Command1_Click()
Dim a(10) As Integer
k=5
For I=1 To 10
a(i)=I^2
Next I
Print a(I-1)
End Sub
(A) 100 (B) 81 (C) 99 (D) 121
6. 在窗体上添加一命令按钮，然后编写如下事件：
Private Sub Command1_Click()
Dim s(10)
For I=6 To 10
s(i)=Val(InputBox(“Enter:”))
Next I
MsgBox s(5)+s(6)*s(10)
End Sub
程序运行后，单击命令按钮，然后输入1、2、3、4、5，显示结果为____.
(A) 5 (B) 10 (C) 15 (D) 显示出错信息
1、选（A）100。
FOR循环完成后，I为11，这里用a(11 - 1)取得a(10)的值，也就是10^2=100。
6、选（A）5。
FOR中通过INPUT对s(6)到s(10)进行了赋值操作，
s(5)没有赋值，所以是数组初始值0。
s(6)是1，s(10)是5，所以结果是5。