首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2019-03-14
79
问题
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编写如下程序,以期实现上述功能:
Private Sub Command1_Click()
str1 = Trim(Combo1.Text)
flag=0
If str1
= 0 To Combo1.ListCount - 1
If str1 = Combo1.List(i) Then
Combo1.RemoveItem i
Combo1.Text = ""
fl<> "" Then
For i ag=1
End If
Next
If flag=1 Then Combo1.AddItem Combo1.Text
End If
End Sub
程序中存在问题,以下关于程序问题的叙述中,正确的是
选项
A、For循环的循环初值i应该从1开始
B、语句Combo1.RemoveItem i有错误
C、语句Combo1.AddItem Combo1.Text有错,Combo1.Text的内容已存在于组合框中
D、应把程序倒数第3行中的If flag=1 改为 If flag=0
答案
D
解析
组合框的ListCount从0开始;RemoveItem和AddItem后面跟的是索引。根据题意,在没有相同列表项时需要添加,所以语句应该为flag = 0。选D)。
转载请注明原文地址:https://kaotiyun.com/show/wZFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在名称为Form1的窗体上添加一个名称为List1的列表框,在属性窗口中为列表框添加三个选项:北京、上海、天津。同时建立一个下拉菜单,其名称为File,标题为“文件”,此菜单含有一个子菜单项,标题为“显示列表框”,名称为Show,初始状态为被选中,运
以下关于图片框、图像框的叙述中,正确的是
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:PrivateSubCommand1_Click()DimA(3,3)AsIntegerForj=1To3Fork=1T
下列不能接收焦点的控件是
下列叙述中正确的是
下列关于通用对话框CommonDialog1的叙述中,错误的是( )。
以下不能用Print方法输出数据的对象或窗口是
负责数据库中查询操作的数据库语言是
下面的数写成普通十进制数是()。8.6787E+8
下面的数写成普通十进制数是()。2.65358979335278D-6
随机试题
清末修律的指导方针是()
A.上皮细胞内足突消失B.上皮下驼峰样沉积物C.系膜区沉积物D.内皮上、致密层和上皮下沉积物毛细血管内增生性肾小球炎电镜可见
温经汤的功用是
HDPE膜铺设规划合理,边坡上的接缝须与坡面的坡向平行,场底横向接缝距坡脚线距离应()。
国有企业、事业单位职工参加基本养老保险前,视同缴费年限期间应当缴纳的基本养老保险费应当由()负担。
党在社会主义初级阶段的基本纲领包括()。
皮亚杰的认知发展理论中认为,支配心理发展的因素有()。
下面不属于星型网络的优点的是()。
项目管理器的“文档”选项卡用于显示和管理()。
Asitturnedouttobeasmallhouseparty,we______soformally.
最新回复
(
0
)