首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2016-09-19
35
问题
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编写如下程序,以期实现上述功能:
Private Sub Command1_Click()
str1=Trim(Combo1.Text)
flag=0
If str1<>""Then
For i=0 To Combo1.ListCount-1
If str1=Combo1.List(i) Then
Combo1.RemoveItem i:Combo1.Text=""
flag=1
End If
Next
If flag=1 Then
Combo1.AddItem Combo1.TeXt
End If
End Sub
程序中存在问题,以下关于程序问题的叙述中,正确的是
选项
A、For循环的循环初值i应该从1开始
B、语句Combo1.RemoveItem i有错误
C、语句Conabo1.AddItemCombo1.Text有错,Combo1.Text的内容已存在于组合框中
D、应把程序倒数第3行中的If flag=1改为If flag=0
答案
D
解析
本题中首先用一个循环遍历组合框的所有列表项,依次取出每一个列表项与str1进行比较,若相同则删除该项,将flag置为1,否则flag为0;循环结束后如果flag的值为0则说明没有任何一个现有的列表项与str1相同,需要将str1添加到组合框中,否则不需添加。
转载请注明原文地址:https://kaotiyun.com/show/EdLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击该按钮,Form1窗体消失,显示Form2窗体,程序如下,请填空。PrivateSubCommand1_Click() Form1.Hide F
有以下程序:SubsubP(b()AsInteger) Fori=1To4 b(i)=2*i NextiEndSubPrivateSubCommand1_Click()Dim
编程实现加法运算,在两个文本框中输入加数,用标签表示结果,单击按钮进行计算,完成下列计算过程。PrivateSubCommand1_Click()DimAAsInteger,BAsIntegerA=_________
在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:PrivateSubForm_Load() List1.AddItem"Item1" List1.AddItem"It
在窗体模块的声明段中用Public定义的变量可以在________模块中使用,而用Dim或Private关键字定义的变量可以在_______模块中使用。
使用驱动器列表框Drivel?目录列表框Dirl?文件列表框Filel时,需要设置控件的同步。以下能够正确设置两个控件同步的命令是
以下关于菜单设计的叙述中错误的是
假设用复制、粘贴的方法建立了一个命令按钮数组Commandl,以下对该数组的说法错误的是()。
假定建立了一个名为Commandl的命令按钮数组,则以下说法中错误的是()。
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如下图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Commandl的命令按钮,并有以下程序。PrivateSubCommand1_Click()
随机试题
“政声人去后,民意巷谈时”,警示领导干部在工作作风方面要时刻注意【】
2011年3月10日凌晨两点钟左右,张某、李某和王某三人蒙面闯进郝某家。三个人进了郝某睡觉的房间,张某从身上抽出砍刀,用刀背猛敲郝某的脑袋。一阵剧痛使郝某惊醒过来:“你们是谁?要干什么?”随后,三人将郝某按在床上,并一齐举起手中的利刃,朝他身上一顿乱捅,可
住宅分户轻质隔墙的隔声标准的隔声量最低限值是:[2004年第085题][2007年第085题]
下列属于民用爆炸物品的爆破器材有()。
明确划分国家各级权力机关、各级政府、各级财政部门以及各部门各单位在预算活动中的职权,是保证依法管理预算的前提条件也是将各级预算编制、预算审批、预算执行、预算调整和预算决算的各环节纳入法治化、规范化轨道的必要措施。《预算法》明确地规定了各级人民代表大会及其常
下面有关托收业务的描述,正确的有( )。
根据《证券法》的规定,下列选项中,属于股份有限公司申请股票上市应当符合的条件有()。
学生李某在课堂上讲话,扰乱课堂秩序,教师让其下课后到办公室,李某来到办公室后,老师先给他一颗糖,说:“这糖奖励你能遵守我们的约定,按时到来。”李某听后羞愧万分,主动向教师道歉并保证不再扰乱课堂秩序。上述案例中的教师表现出的是()。
班主任工作的中心环节是全面了解和研究学生。()
【S1】【S5】
最新回复
(
0
)