首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2015-10-23
50
问题
窗体上有一个名称为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/oHLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请阅读程序:SubsubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubCommand1_Click()Di
下列叙述中错误的是()。
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
下列不属于软件工程的3个要素的是()。
已知数组A(4,4),各个元素在运行程序时被赋值并打印,形成四除非方阵。请在【】和【】处填处所需的内容,使产生一个转置矩阵(即行列互换),仍放在数组A中,并打印出来。例如:123412341234
在用通用对话框控件建立″打开″或″保存″文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指
以下关系表达式中,其值为假的是
关系表中的每一横行称为一个
下列运算符中,优先级别最高的是
随机试题
变压器油的作用是加强变压器内部的绝缘和散热。()
(2005年第21题)患者长期大量使用糖皮质激素时,下列哪种变化正确
男性,48岁。肝硬化病史5年.半年来腹胀加重,伴有双下肢水肿。下面治疗措施不当的是
焦虑症治疗时最常用的药物是
杨某在s市某电器经营市场因涉嫌携带凶器抢夺,被公安机关当场抓获,并被人民检察院批准逮捕。在侦查阶段,杨某聘请当地著名律师谢某为其辩护。依据刑事诉讼法的规定,下列关于律师谢某诉讼权利的说法正确的有:
【真题(初级)】下列有关审计风险的表述中,正确的是()。
所有投资者可以及时免费获得充分的市场信息,对预期收益率、标准差和证券之间的协方差具有相同的预期值,这体现出CAPM模型中的()假定。
把下面的六个图形分成两类,使每一类图形都有各自的共同特征或规律,分类正确的一项是:
行列式
Whatdidyoulearnabouttheman?
最新回复
(
0
)