[填空题] 在窗体上画一个名称为Combo1的组合框,然后画两个名称分别为Labe1、Label2,标题分别为"城市名称"和空白的标签。程序运行后,在组合框中输入一个新项目并按回车

13 查阅

[填空题] 在窗体上画一个名称为Combo1的组合框,然后画两个名称分别为Labe1、Label2,标题分别为"城市名称"和空白的标签。程序运行后,在组合框中输入一个新项目并按回车键,如果输入的项目在组合框的列表中不存在,则自动将其添加到组合框的列表中,并在Label2中给出提示"已成功添加新输入项。",如图所示。如果输入的项目已存在,则在Label2中给出提示"输入项已在组合框中。"。 请填空。Private Sub Combol_KeyPress(KeyAscii As Integer)If KeyAscii=13 Then For i=0 To Combo1.ListCount-1If Combo1.Text=【 】ThenLabel2.Caption="输入项已在组合框中。"Exit SubEnd IfNext i Label2.Caption="已成功添加新输入项。"Combo1.【 】Comb01.TextEnd If End Sub

参考答案:

ComboA.A,ist(i),AddItem

组合框中的List属性用来列出表项的内容。该属性保存了列表框中所有数组的值,可以通过下标访问数组中的值(下标从0开始),其格式为:[组合框.]"St(下标),特别注意的是"下标"相当于索引值,指示着表项中某一项表中内容的位置,第一项的索引值为0,第二项为1,依此类推,这个参数非常重要不可省略。此题循环变量i从0开始循环直至组合框中总的表项数,不难理解这相当于上面提到的下标参数。组合框的AddItem方法用于在组合框中插入一行文本,其格式为:组合框.AddItem项目字符串[,索引值]。

计算机考试