首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2018-05-08
35
问题
窗体上有一个名称为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/ycGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序的运行结果是()。PrivateSubForm_Click()i=0DoUntil0i=i+1Ifi>10ThenExitDo
对随机文件数据存取是以【】为单位进行操作的。
数据库逻辑设计的主要工作是将E-R图转换成指定RDBMS中的【】。
如果一个变量未经定义就直接使用,则该变量的类型为
“商品”与“顾客”两个实体集之间的联系一般是
数据库系统的核心是
执行下面的程序段后,变量S的值为()。S=5Fori=2.6To4.9Step0.6S=S+lNexti
可以产生30~50(含30和50)之间的随机整数的表达式是
在设计阶段,假定在图片框:Picturel中装入了一个图形,为了删除该图片框控件,应采用的正确操作是
在考生文件夹下有一个工程文件sjt5.vbp和随机文件in5.txt,文件中的每个记录包括三个字段,分别为姓名、电话和邮编,其名称、类型和长度如下:窗体中有一个文本框和两个命令按钮。程序运行后,如果单击”读入并显示记录”按钮,则从考生文件夹下的in5.
随机试题
轻便消防水龙的消防水带单位长度质量应不超过180g/m。()
关于过期流产的描述错误的是
有头疽的致病菌主要是
A.但寒不热B.阴虚潮热C.湿温潮热D.阳明潮热E.寒热往来骨蒸潮热为()。
某公寓设置中水供水系统用于冲厕,中水总用水量为12m3/d,中水处理设备设计运行时间为8h/d,则该系统的中水储水池最小有效容积为()。
城市规划的意义是()。
某市房地产企业2017年1~10月在6千平方米的土地上开发建成一幢建筑面积为6万平方米的商品房,本年内未销售;2017年4月有偿受让填海形成的土地2万平方米。当地城镇土地使用税的适用年税额为每平方米3元,该企业2017年应缴纳城镇土地使用税()。
《刑法》第267条规定:“抢夺公私财物,数额较大的,处三年以下有期徒刑、拘役或者管制,并处或者单处罚金;数额巨大或者有其他严重情节的,处三年以上十年以下有期徒刑,并处罚金;数额特别巨大或者有其他特别严重情节的,处十年以上有期徒刑或者无期徒刑,并处罚金或者没
新民主主义社会在经济上实行国营经济、合作社经济、个体经济、私人资本主义经济和国家资本主义经济五种经济成分并存的经济制度。五种经济成分中,在国民经济中居于领导地位的是()。
acceptdeath在某些情况下,人们支持克隆人是因为他们害怕死亡,所以答案应该是unwillingtoacceptdeath。
最新回复
(
0
)