首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2016-09-19
68
问题
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编写如下程序,以期实现上述功能:
Private Sub Command1_Click()
str1=Trim(Combo1.Text)
flag=0
If str1<>""Then
For i=0 To Combo1.ListCount-1
If str1=Combo1.List(i) Then
Combo1.RemoveItem i:Combo1.Text=""
flag=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、语句Conabo1.AddItemCombo1.Text有错,Combo1.Text的内容已存在于组合框中
D、应把程序倒数第3行中的If flag=1改为If flag=0
答案
D
解析
本题中首先用一个循环遍历组合框的所有列表项,依次取出每一个列表项与str1进行比较,若相同则删除该项,将flag置为1,否则flag为0;循环结束后如果flag的值为0则说明没有任何一个现有的列表项与str1相同,需要将str1添加到组合框中,否则不需添加。
转载请注明原文地址:https://kaotiyun.com/show/EdLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击窗体时,下列程序段的执行结果为()。PrivateSubForm_Crick()Line(200,200)-(400,400)Print"+++++++++++++++++++"Print"*********
窗体的Enable属性的值是()类型的数据。
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() A="12" B="34" C="56" PrintA+B+CEndSub程序运行后
下面的数组声明语句中()是正确的。
将一个窗体设置为MDI子窗体的方法是
单击命令按钮时,下列程序的运行结果为PrivateSubCommand1_Click() PrintFun(23,18)EndSubPublicFunctionFun(mAsInteger,nAsInte
当用户()时,会引发焦点所在控件的KeyPress事件。
下列叙述中正确的是()。
设窗体上有一个名称为Labell的标签。程序运行时,单击鼠标左键,再移动鼠标,鼠标的位置坐标会实时地显示在Labell标签中;单击鼠标右键则停止实时显示,并将标签中的内容清除。下面的程序可实现这一功能,请填空。DimdownAsBoolean
下面定义窗体级变量a的语句中错误的是
随机试题
保证整个组织协调一致、有效运作的关键是组织结构设计的()。
甲投资基金利用市场公开信息进行价值分析和投资,在下列效率不同的资本市场中,该投资基金可获取超额收益的有()。
注册会计师在确定审计报告日期时,以下属于确认审计报告日条件的有()。
从所给的选项中,选择最合适的一个填入问号处,使之符合一定的规律性。()
教育法规在时间效力方面主要有哪几个原则?()
全国人民代表大会具有的职权有()。
YouwillhearaninterviewaboutGalapagosAdventureTourinEcuador.Asyoulisten,youmustanswerQuestions21to30bywriti
NorthernIrelandissmall,butitissignificantbecauseof______there.
NobigdevelopedcountryhascomeoutoftheglobalrecessionlookingstrongerthanGermanyhas.Theeconomyminister,RainerBr
CricketCricketisan【T1】______gameplayedbetween2teamstryingtohita【T2】______ballasfaraspossiblewithawooden
最新回复
(
0
)