首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combol的组合框,一个名称为Commandl的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combol的组合框,一个名称为Commandl的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2019-04-29
58
问题
窗体上有一个名称为Combol的组合框,一个名称为Commandl的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编写如下程序,以期实现上述功能:
Private Sub Commandl_Click()
strl=Trim(Comb01.Text):flag=0
Ifstrl<>""Then
For i=0 To Combo1.ListCount一1
If strl=Combo1.List(i)Then
Combo1.Removeltem i:Combo1.Text=””:flag=1
End If
Next
If flag=1 Then
Combo 1.AddItem Combo 1.Text
End If
End Sub
程序中存在问题,以下关于程序问题的叙述中,正确的是
选项
A、For循环的循环初值i应该从1开始
B、语句Combo1.Removeltem i有错误
C、语句Combo1.Addltem Combo1.Text有错,Combo1.Text的内容已存在于组合框中
D、应把程序倒数第3行中的Ifflag=1改为lf flag=0
答案
D
解析
本题中首先用一个循环遍历组合框的所有列表项,依次取出每一个列表项与strl进行比较,若相同则删除该项,将flag置为1,否则flag为0:循环结束后如果flag的值为0则说明没有任何一个现有的列表项与strl相同,需要将strl添加到组合框中,否则不需添加。
转载请注明原文地址:https://kaotiyun.com/show/SGUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Ch1的复选框数组,含三个复选框,它们的Index属性分别为0、1、2,标题依次为“体育”
在考生文件夹下有一个工程文件sjt4.vbp。在其窗体中“待选城市”下的List1列表框中有若干个城市名称。程序运行时,选中List1中若干个列表项,如图3-138(a)所示,单击“选中”按钮则把选中的项目移到List2中;单击“显示”按钮,则在Text1
考生文件夹下的工程文件sjt3.vbp中有一个菜单、两个标签和两个文本框。程序运行时,用鼠标右键单击窗体会弹出一个弹出式菜单(如图3-160所示)。当选中“计算100以内自然数之和”菜单项时,将计算100以内自然数之和并放入Text1中;当选中“计算7!”
在考生文件夹下有一个工程文什sjt3.vbp,其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0.5秒,方框的颜色交替变为黄色和红色(黄色值为&HFFFF&;红色值为&HFF&);若单击鼠标右键,则停止变色;若单.击鼠标左键,则方框左上角移到鼠标点击
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1、标题为“椭圆练习”的窗体上,画1个名称为Shape1的椭圆,其高为800、宽为1200、左边距为1000。椭圆的边框是宽度为5的蓝色(&H00C00000
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1、标题为“电影制作”的窗体上画1个名称为Crab1、初始内容为空的下拉式组合框(可以输入文本)。下拉列表中有“音频效果”、“视频效果”和“视频过渡”3个表项
某人编写如下函数来判断a是否为素数,若是,则函数返回True;否则返回False。Functionprime(aAsInteger)AsBooleanDimkAsInteger,isprimeAsBoolean
在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(
随机试题
企业在确定文化战略时应考虑和分析哪些因素?
肱骨外科颈骨折
女性,28岁。G1P0,末次月经是1994年4月25日,预产期应是
患者,女性,72岁。全胃切除术后7天,大量肠液自腹腔引流管引出,左上腹疼痛。查体:左上腹疼痛,无肌紧张,首选治疗措施是()
A.龋均B.CPIC.Dean指数(氟牙症指数)D.简化口腔卫生指数E.龈沟出血指数评价人群口腔卫生状况主要用
项目的风险处理对策不包括()
小学低年级学生的思维水平是()
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tAddr”和“tUser”,同时还设计出窗体对象“fEdit”和“fEuser”。请在此基础上按照以下要求补充“fEdit”窗体的设计:将窗体标题设为“显示/修改用户口令
主人は仕事を休んて、家でごろごろしています。________、お宅のみなさんはお元気ですか。
•Lookattheformbelow.•Youwillhearastaffdevelopmentofficerbookinganewmemberofstaffonanin-housetrainingcourse
最新回复
(
0
)