首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2015-06-30
39
问题
窗体上有一个名称为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/2MQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序运行时,内层循环的循环总次数是ForM=1To3ForN=0ToM-1NextNNextM
在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白,然后编写如下事件过程:PrivateSubCommand1_Click()x=Int(Val(Tex
执行下面的语句后,所产生的信息框的标题是()a=MsgBox(“AAAA”,“BBBB”,“”,5)
数据库管理系统常见的数据模型有层次模型、网状模型和【】三种。
软件结构是以【】为基础而组成的一种控制层次结构。
循环链表的主要优点是()
设A="12345678",则表达式Val(Len(A,4)+Mid(A,4,2))的值为______。
下列叙述中正确的是______。
可以产生30一50(含30和50)之间的随机整数的表达式是
在VisualBasic中,下列运算符中优先级最高的是______。
随机试题
深昏迷包括【】
Theprogramoneducationis______watching.
初产妇,30岁,妊娠38周,自然分娩一健康男婴,阴道侧切,胎盘也正常娩出。产后1小时发现产妇面色苍白,出冷汗,阴道流血量较多,主诉头晕,心慌和口渴。血压11.97/6.65kPa(90/50mmHg),脉搏每分钟120次。既往血小板减少症,无高血压及低血压
患者男性,67岁。发热伴右上腹钝痛2天,恶心,食欲下降、乏力。继往有糖尿病史。查体:T39.4℃,右下胸及肝区叩击痛,右上腹肌紧张及触痛。X线胸腹部检查示:肝影增大伴局限性隆起,右膈肌上抬。18F-FDGPET示肝右叶放射性分布局灶性异常浓聚,SUVa
患儿,5个月。突然烦躁高热,吃奶后频繁呕吐,眼神呆滞,意识模糊,前囟饱满。脑脊液细胞数600×106/L,其中多核细胞68%,糖2.1mmol/L,氯化物126mmol/L,蛋白质1.4g/L。最可能的诊断为()
下列哪一选项是正确的()
下列关于装载入境动物的运输工具的检疫说法正确的是( )。
蒲松龄所著的文言短篇小说集《聊斋志异》,以谈鬼写狐的表现方式,揭露和抨击了封建社会的丑恶,赞美了作者心目中理想的爱情。()
Simonalastwrotetomesevenmonthsago.heardI____________________Simonaforsevenmonths.
Itdoesn’tmatter______he’scomebackornot.
最新回复
(
0
)