首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combol的组合框,一个名称为Command 1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人
窗体上有一个名称为Combol的组合框,一个名称为Command 1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人
admin
2020-04-18
40
问题
窗体上有一个名称为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全国计算机二级
相关试题推荐
在窗体上画一个名为Commandl的命令按钮,然后编写以下程序:PrivateSubCommandl—Click()DimM(10)AsIntegerFork=1To10M(k)=12一kNe
单击命令按钮执行以下程序,则输出结果为()。PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=14:y=48CallProc(x,y)
窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:PrivateSubText1_Change(IndexAsInteger) SelectCaseIndex Case0 Text1(1).
设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是()。
设窗体上有一个标签Labell和一个计时器Timerl,Timerl的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是()。
可以产生30~50(含30和50)之间的随机整数的表达式是( )。
某二叉树有5个度为2的结点,则该叉树中的叶子结点数是()。
软件测试的目的是()。
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有一个名称为List1的列表框,且已有若干个项目,如图(a)所示。“部分反序”命令按钮的名称为Command1。程序运行时,单击“部分反序”按钮,列表框中除最前面的一个项目不动外,其他项目的顺序反向
软件测试的目的是( )。
随机试题
设∫1+∞xpdx收敛,则p的取值范围是__________.
患者本次因深昏迷住院,第一次住院记录提供该患者有肝硬化腹水12年,最近连续3次血氨检查均正常,你认为哪项药物较合适
由造血干细胞和微循环障碍所致的贫血是
A、上颌乳尖牙B、下颌乳尖牙C、上颌乳中切牙D、上颌第二乳磨牙E、下颌第一乳磨牙哪个牙的形态不似任何恒牙
香附与高良姜配伍后,除善温中散寒,止痛,还善()。
下列不属于短期信用工具的是()。
下列关于招标人对潜在投标人或者投标人进行资格审查的说法正确的是()。
某一特定商品或资产在某一特定地点的现货价格与其期货价格之间的差额称为()
下列因素中,可能影响各类资产的风险收益状况以及相关关系的资本市场环境因素有( )。
2006年3月,银监会就商业银行开展个人理财业务所面临的各种风险,提出了进一步的监管要求,其中包括()。
最新回复
(
0
)