●试题五 阅读以下应用说明及Visual Basic部分程序代码,将应填入(n)处的字句写在答题纸的对应栏

10 查阅

●试题五

阅读以下应用说明及Visual Basic部分程序代码,将应填入(n)处的字句写在答题纸的对应栏内。

【说明】

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

【程序】

Private Sub Combo1_ (1) (KeyAscii As Integer)

If KeyAscii= (2) Then

For i=0 To (3)

If Combo1.Text= (4) Then

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

Exit Sub

End If

Next i

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

Combo1. (5) Combo1.Text

End If

End Sub

参考答案:

●试题五【答案】(1)KeyPress(2)13(3)Combo1.ListCount-1(4)Combo1.List(i)(5)AddItem【解析】根据题意,"在组合框中输入一个新项后按回车键(ASCII码为13)时…",因此Combol的事件名称应是Combo1_KeyPress,即(1)空填"KeyPress";(2)空判断按键是否是回车键,填"13";如果是,再穷举组合框的所有列表项(即、(3)空填"Combo1.ListCount-1"),查看是否有等于输入项Combo1.Te

软考初级