首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2015-08-28
51
问题
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编写如下程序,以期实现上述功能:
Private Sub Command1_Click()
str1 = Trim(Combo1.Text)
flag=0
If str1
= 0 To Combo1.ListCount - 1
If str1 = Combo1.List(i) Then
Combo1.RemoveItem i
Combo1.Text = ""
fl<> "" Then
For i ag=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、语句Combo1.AddItem Combo1.Text有错,Combo1.Text的内容已存在于组合框中
D、应把程序倒数第3行中的If flag=1 改为 If flag=0
答案
D
解析
组合框的ListCount从0开始;RemoveItem和AddItem后面跟的是索引。根据题意,在没有相同列表项时需要添加,所以语句应该为flag = 0。选D)。
转载请注明原文地址:https://kaotiyun.com/show/SeQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下程序:PrivateSubForm_Click()n=10i=0Doi=i+nn=n-2Loopwhilen>2PrintiEndsub程序运行后,单击窗体,输出结果为【】。
要求当鼠标在图片框P1中移动时,立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是
窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序PrivateSubCommand1_click()Dim11IfTextl.Text”123456”Thenn=n+1print“口夸输入错误”&n&次”End
设x是整型变量,与函数IIf(X>0,-x,x)有相同结果的代数式是
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的,在名称为Forml的窗体上有一个Label控件和两个名称分别为Commandl和Command2、标题分别为“开始”和“关闭”的命令按钮。编写函数Minus(A,N),其功能
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在Forml的窗体上画一个名称为Pl的图片框,然后建立一个主菜单,标题为“操作”,名称为op,该菜单有两个子菜单,其标题分别为“显示”和“清除”,名称分别为Dis和Clea
有下列二叉树,对此二叉树前序遍历的结果为()。
设有语句Open"c:\Test.Dat"ForOutputAs#1则以下错误的叙述是______。
已知二叉树BT的后序遍历序列是dabec,中序遍历序列是debac,它的前序遍历序列是______。
随机试题
下列树木中与八角金盘为同一科的是
患者,男,40岁。3年来出现劳累后胸闷、头晕,1小时前因胸闷自用硝酸甘油片后感头晕加重,并出现短暂黑嚎而来院。既往无高血压病史,无烟酒史,其父有类似病史。查体:血压120/70mmHg,脉率68次/分,双肺(-),心界不大,心律整,胸骨左缘3~4肋间可闻3
A.主要扩张冠状动脉,增加氧供B.以降低氧耗量为主C.增加心肌收缩力D.降低外周阻力E.降低前负荷硝酸酯类
抢救急性中毒患儿,首先要达到的护理目标是
患者,女,45岁,已婚。月经提前,量多、色淡、质稀,纳少便溏,气短懒言,舌淡苔白,脉缓弱。其治法是
哪种溶液不可用来冲洗伤口
沉井主要是靠井壁的( )来克服( )而下沉的。
商业助学贷款采用的担保方式不包括()。
目前,我们所称的“五大行”是指()。
A、Shorteningtheworkhours.B、Promotingtakingbusandwalking.C、Buildingmoreparks.D、Stimulatingthenationaleconomy.B对话中
最新回复
(
0
)