首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combol的组合框,一个名称为Command 1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人
窗体上有一个名称为Combol的组合框,一个名称为Command 1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人
admin
2020-04-18
76
问题
窗体上有一个名称为Combol的组合框,一个名称为Command 1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编写如下程序,以期实现上述功能:
Private Sub Command 1_Click()
strl=Trim(Combol.Text)
flag=0
If strl<>""Then
For i=0 To Combol.ListCount-1
If strl =Combol.List(i)Then
Combol.RemoveItem i:Combol.Text=""
flag=1
End If
Next
Ifflag=1 Then
Combol.AddItem Combol.Text
End If
End Sub
程序中存在问题,以下关于程序问题的叙述中,正确的是
选项
A、For循环的循环初值i应该从1开始
B、语句Combol.RemoveItem i有错误
C、语句Combol.AddItem Combol.Text有错,Combol.Text的内容已存在于组合框中
D、应把程序倒数第3行中的Ifflag=l改为Ifflag=0
答案
D
解析
本题中首先用一个循环遍历组合框的所有列表项,依次取出每一个列表项与strl进行比较,若相同则删除该项,将flag置为1,否则flag为0;循环结束后如果flag的值为0则说明没有任何一个现有的列表项与str1相同,需要将str1添加到组合框中,否则不需添加。
转载请注明原文地址:https://kaotiyun.com/show/iwTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面是求最大公约数的函数的首部()。Functionfun(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是
窗体上有一个名称为VScroll的滚动条,当用鼠标拖动滚动条中的滚动块时,触发的事件是()。
设工程中有2个窗体:Forml、Form2,Forml为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Forml的文本框Textl中输入口令并按回车键(回车键的ASCⅡ码为13)后,隐藏Forml,显示Form2。若口令为”XSLNCER”
数据字典(DD)所定义的对象都包含于
在窗体(Name属性为Forml)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程()。PrivateSubCommand1_Click()
在考生文件夹下有一个工程文件Sjt5.vbp,窗体上有三个文本框,其名称分别为Text1、Text2和Text3,其中Text1、Text2可多行显示。请添加三个命令按钮,名称分别为Cmd1、Cmd2和Cmd3,标题分别为“产生数组”、“统计”和“退出”,
关于KeyPress事件,以下叙述中正确的是( )。
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图所示。运行程序,单击“读数据”按钮,读入文件中的数据到字符串变量中并显示在Label2标签中。单击“排序”命令按钮时,对读入的数据从小到大进行排序,并将排序结果在窗体的Label4控件中显示。
下面不属于软件测试实施步骤的是
下列数据结构中,能够按照"先进后出"原则存取数据的是( )。
随机试题
名牌战略
当代科学技术发展的基本特征是()
内环境是指
对无家属签字的无自主意识患者的紧急输血,经治医师应上报何部门同意、备案,并记入病历
患者,男性,70岁。较长时间大便干燥,近2周来,排便时疼痛伴出血,经检查,肛管皮肤全层裂开,形成溃疡,诊断为肛裂。采用坐浴等非手术治疗。该患者肛门坐浴的水温应为
装配式梁(板)施工方案编制前,应对施工现场条件和()进行充分调研和评估。
下列哪一项个人所得不应免纳个人所得税?()
以下不属于招聘渠道的吸引力的评估指标的是()。
上位学习又称()
Agingbabyboomersaredeterminedtofighttheagingprocess.Theyspendmillionsofdollarsayearon【C1】________theyperceive
最新回复
(
0
)