首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列 表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列 表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框
admin
2019-03-08
26
问题
窗体上有一个名称为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/K4Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下程序:PrivateSubsV(ByValmAsInteger,nAsInteger)m=m*2n=n-5Printm;nEndSubPrivateSubForm_Cli
在设计阶段,假定在图片框Picture1中装入了一个图形,为了删除该图片框控件,应采用的正确操作是
为了在运行时能显示窗体左上角的控制框(即系统菜单),应执行的操作是
在VisualBasic中,所有标准控件都具有的属性是( )。
编写如下程序:PrivateSubCommand1_Click()DimnAsIntegern=InputBox("请输入一个数值:")Printn;ff(n)EndSubFunctionff(xAs
设a=10,b=4,c=5,d=7,表达式a>bAndNotc
为了返回或设置磁盘驱动器的名称,应使用的驱动器列表框的属性是
在For的二重循环中,内外循环的循环控制变量名
下列关于通用对话框CommonDialog1的叙述中,错误的是( )。
随机试题
为了确保方案顺利实施,企业应从哪些方面推动咨询方案的实施?
口腔黏膜上皮粒层明显,角质层有脱落,并见角质栓塞,应考虑
硫酸链霉素与硫酸庆大霉素共有的鉴别试验有
建设工程项目信息按项目实施的工作过程分类,可分为()。
根据《银行卡业务管理办法》的有关规定,透支期限最长为60天的是( )。
债务和解是债权人自愿同意减少债务。()
__________为全国诸葛亮后裔的最大聚居地,其最神奇之处,当数称为中国一绝的村落布局。
简述发展心理学的研究领域。
在数据库应用系统运行阶段,数据库日常维护工作主要是由DBA完成的,下列工作中不属于数据库运行维护工作的是(),
Thatwayoflivingis______topeopleinthissmallpartofthecountry.
最新回复
(
0
)