高中信息技术 VB程序的调试 会考复****题
学校:___________姓名:___________班级:___________考号:___________
一、选择题
1.数组排序。点击“产生随机数”按钮,让计算机随机产生10个整数,并对这10个整数进行标号,再点击“排序”按钮,对这10个整数进行从大到小排序。如图所示。
程序代码如下:
Dim a(1 To 10) As Integer
Dim i, j, k, kt As Integer
Private Sub Command1_Click()
'清除列表框数据
For i = 1 To 10
Randomize '随机数初始化
a(i) = Int(Rnd() * 1000)
Str(i) + ”=” + Str(a(i))
Next i
= True '激活排序按钮
End Sub
Private Sub Command2_Click()
For i = 1 To 9
k = i
For j =____①____To 10
If a(j) > a(k) Then k = j
Next j
If i <> k Then
__②____
End If
Next i
For i = 1 To 10
Str(i) + ” =” + Str(a(i))
Next i
End Sub
请在①、②划线处填入合适的语句或表达式,把程序补充完整:
程序中①划线处应填入__________________;
程序中②划线处应填入__________________。
【答案】①I+1;②t=a(k):a(k)=a(i):a(i)=t
【解析】
2.Sub test2()
a = 12:b = 12:c = 5
= ""
= ""
If a > b Or Not b<c Then
= "monday"
Else
= "tiger"
End If
=" +"
End sub
该程序段运行后,在标签Label3的Caption属性值是( )
A. "monday" B. "tiger" C. "mondaytiger" D. ""
【答案】A
【解析】
3.在窗体上画一个命令按钮,名称为command1,单击命令按钮,执行如下事件过程:
Private Sub Command1_Click()
Dim a As String
Dim c As String
a = "software and hardware"
c = Mid(a, 14, 8)
= c
End Sub
则在文本框Text1中显示的信息是( )
A、software and hardware
B、software
C、hadrware
D、and
【答案】C
【解析】
4.有如下Visual Basic程序段:
s=1
for i= 1 to 11 step 3
s=s*i
next i
语句s=s*i共执行的次数为( )
A.11 B.10 C.5 D.4
【答案】D
【解析】
5.数学表达式“a>b>c”对应的VB表达式是( )
A.a>b>c B.a>b and a>c C.a>b and b>c D.a>b or b>c
【答案】C
【解析】
6. 表达式 abs(int(-)+int())的值是( )。
A. 5 B. 0 C. 1 D. 2
【答案】B
【解析】
7.对以下程序段的说法正确的是( )
s=0
i=0
Do While s<10
i=i+1
s=s+i*i
Loop
A.该程序的循环体执行了3次
B.该程序段结束后i的值为3
C.该程序段结束后i的值为4
D.该程序段结束后s的值为13
【答案】ABD
【解析】
8.在Visual Basic代码中,将多个语句合并在一
高中信息技术vb程序的调试会考复习题 来自淘豆网www.taodocs.com转载请标明出处.