首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2013-10-16
75
问题
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编写如下程序,以期实现上述功能:
Private Sub Command l_Click()
strl=Trim(Combol.Text)
flag=0
Ifstrl<>””Then
For i=0 To Combol.ListCount-1
If strl=Combo 1.List(i)Then
Combol.Removeltem i:Comb01.Text=””
flag=1
End If
Next
If flag=1 Then
Combo l.Addltem Combo l.Text
End If
End Sub
程序中存在问题,以下关于程序问题的叙述中,正确的是
选项
A、For循环的循环初值i应该从1开始
B、语句Combo l.Removeltem i有错误
C、语句Combol.Addltem Combol.Text有错,Combol.Text的内容已存在于组合框中
D、应把程序倒数第3行中的Ifflag=1改为Ifflag=0
答案
D
解析
本题中首先用一个循环遍历组合框的所有列表项,依次取出每一个列表项与str1进行比较,若相同则删除该项,将flag置为1,否则flag为0;循环结束后如果flag的值为0则说明没有任何一个现有的列表项与str1,相同,需要将str1添加到组合框中,否则不需添加。
转载请注明原文地址:https://kaotiyun.com/show/7FQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上绘制一个文本框(名称为Text1)和一个命令按钮(名称为Cmd1,标题为Display)。请编写Cmdl的Click事件过程,使得在程序运行后,按Esc键就调用这个事件过程且在文本框中显示VisualBasic,程序运行结果如下图所示。
在考生文件夹中有一个工程文件execise106.vbp及窗体文件execise106.frm。请在名为Form1的窗体上绘制两个框架(如下图所示),其名称分别为Frame1和Frame2,标题分别为“交通工具”和“到达目标”。在Fmme1中绘制两个单选
在名为Form1的窗体上绘制两个文本框,名称分别为Text1和Text2,它们都显示垂直滚动条和水平滚动条,都可以显示多行文本;再绘制一个命令按钮,名为Cmd1,标题为Copy如下图所示。请编写适当的事件过程,使得程序在运行时,在Text1中输入多行文本
在名为Form1的窗体上建立一个名为Opt1的单选按钮数组,含3个单选按钮,它们的标题依次为First、Second和Third,其下标分别为0,1,2。初始状态下,Third为选中状态。运行后的窗体如下图所示。注意:文件必须存放在考生文
在名为Form1的窗体上绘制一个名为Cmd1的命令按钮,标题为“打开文件”,再绘制一个名为CD1的通用对话框。程序运行后,若单击命令按钮,则弹出“打开文件”对话框。请按下列要求设置属性和编写代码:(1)设置适当属性,使对话框的标题为“打开文件”。
在名为Form1的窗体上放置两个列表框,名称分别为List1和List2。在List1中添加“1”、“2”…“10”,并设置MultiSelect属性为2(要求在控件属性中设置)。再放置一个名为Cmd1,标题为“复制”的命令按钮。程序运行后,若单击“复制
在考生文件夹中有工程文件execise113.vbp及窗体文件execise113.frm。在名为Form1的窗体上有一个标签数组,名为Lab1,该数组有4个控件元素,标题分别是Wait、Edit、Aix和Move,如下图所示。在程序运行后,将
在名为Form1的窗体上绘制一个文本框,名为Text1,其初始内容为0;绘制一个命令按钮,名为Cmd1,标题为Begin;再绘制一个名为Timer1的计时器。要求在开始运行时不计数,单击Begin按钮后,则使文本框中的数每秒加1(方法是:把计时器的相应属性
设窗体上有一个列表框控件Listl,含有若干列表项。以下能表示当前被选中的列表项内容的是
随机试题
录用涉及国家安全、保密或者专门技术性很强的特殊职位的公务员,不宜进行公开考试,但须经______批准。
从网络的覆盖范围与规模分类,可以将网络分为()。
A.石膏、知母B.石膏、人参C.石膏、粳米D.石膏、牛膝E.石膏、寒水石(2005年第96,97题)属于桂苓甘露饮组成药物的是()
A.细胞毒性脑水肿B.血管源性脑水肿C.混合性脑水肿D.先有细胞毒性后转化为血管源性脑水肿E.脑水肿以脑灰质的肿胀甚于白质下列疾病多见于哪一种类型的脑水肿脑缺血、缺氧的初期
在国际贸易中,签订合同的基础是()。
同一财产法定登记的抵押权与质权并存时,抵押权人优先于质权人受偿。()
教师职业劳动的示范性
Onehundredyearsago,therewasacleardifferenceamongtownandcountry.Butthemotorcarhaschanged【S1】_________.
Childrenlivingwithsingleparentsencountermanyproblems.Theyaremore【C1】______stressfulexperiencesthanarechildrenlivi
Manyprivateinstitutionsofhighereducationaroundthecountryareindanger.Notallwillbesaved,andperhapsnotalldeser
最新回复
(
0
)