2006年5月软考《程序员》最新预测试题2

模拟下午试题

试题四  VB程序设计题目

在窗体上画一个名称为Combo1的组合框，画两个名称分别Label1和Label2及Caption 属性分别为"城市名称"和空白的标签。程序运行后，当在组合框中输入一个新项后按回车键（ASCII码为13）时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列表中，并在Label2中给出提示"已成功添加输入项"如图所示；如果存在，则在Label2中给出提示"输入项已在组合框中"。请在空处将程序补充完整。

Private Sub Combo1_ （1） (KeyAscii As Integer)

If KeyAscii = 13 Then

For i = 0 To Combo1.ListCount-1

If Combo1.Text = （2） Then

Label2.Caption = "输入项已在组合框中"

Exit Sub

End If

（3）

Label2.Caption = "已成功添加输入项"

Combo1.（4） Combo1.Text

（5）

End Sub

试题七  VB程序设计题目

上述程序的功能是，通过调用过程swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，……，a(5)与a(6)的值互换。

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：

Option Base 1

Private Sub Command1_Click()

Dim a(10) As Integer

For i = 1 To 10

a(i) = i

Next

Call swap（　（1）　）

For i = 1 To 10

Print a(i);

Next

End Sub

Sub swap(b() As Integer)

n = （2）

For i = 1 To n / 2

t = （3）

b(i) = b(n)

（4）= t

（5）

Next

End Sub