2. 计算机
  3. 在考生文件夹下有一个工程文件sjt4．vbp，其中的窗体中有一个组合框和一个命令按钮(如图3-196所示)。程序的功能是在运行时，如果在组合框中输入一个项目并单击“添加”按钮，则搜索组合框中的项目，如果没有此项，则把此项添加到列表中；如果有此项，则弹出提示

在考生文件夹下有一个工程文件sjt4．vbp，其中的窗体中有一个组合框和一个命令按钮(如图3-196所示)。程序的功能是在运行时，如果在组合框中输入一个项目并单击“添加”按钮，则搜索组合框中的项目，如果没有此项，则把此项添加到列表中；如果有此项，则弹出提示

admin2016-01-31  45
问题 在考生文件夹下有一个工程文件sjt4．vbp，其中的窗体中有一个组合框和一个命令按钮(如图3-196所示)。程序的功能是在运行时，如果在组合框中输入一个项目并单击“添加”按钮，则搜索组合框中的项目，如果没有此项，则把此项添加到列表中；如果有此项，则弹出提示“已有此项”，然后清除输入的内容。
   
    要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的属性。最后把修改后的文件以原来的文件名存盘。
选项
答案审题分析 本题“添加”按钮的单击事件过程源代码设计思路：利用For循环语句(初值为0，终值为Cb1．ListCount-1)，逐一判断组合框列表框中的各项是否与文本输入框中的内容一致(条件表达式为Cb1．List(i)= Cb1．Text)，若一致则设置布尔型变量flag的值为True，并且退出循环，否则设置变量flag的值为False。 循环结束后，通过判断flag的值是否为True(条件表达式为flag=True，可简写为flag)，如果条件为真，则利用MsgBox语句显示“项目已存在，请重新输入!”，否则利用AddItem方法将当前文本输入框中的内容(Cb1．Text)添加到组合框列表框中。 操作步骤 步骤1：打开考生文件下的本题工程文件sjt4．vbp。 步骤2：打开代码编辑窗口，去掉程序中的注释符“′”，将问号“?”改为正确的内容。 参考代码： For i=O To Cb1．ListCount-1 If Cb1．List(i)=Cb1．Text Then Cb1．AddItem Cb1．Text 考点链接 选择控件、For循环结构。
解析
转载请注明原文地址:https://kaotiyun.com/show/BrLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)