首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combol的组合框,一个名称为Commandl的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combol的组合框,一个名称为Commandl的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2019-04-29
28
问题
窗体上有一个名称为Combol的组合框,一个名称为Commandl的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编写如下程序,以期实现上述功能:
Private Sub Commandl_Click()
strl=Trim(Comb01.Text):flag=0
Ifstrl<>""Then
For i=0 To Combo1.ListCount一1
If strl=Combo1.List(i)Then
Combo1.Removeltem i:Combo1.Text=””:flag=1
End If
Next
If flag=1 Then
Combo 1.AddItem Combo 1.Text
End If
End Sub
程序中存在问题,以下关于程序问题的叙述中,正确的是
选项
A、For循环的循环初值i应该从1开始
B、语句Combo1.Removeltem i有错误
C、语句Combo1.Addltem Combo1.Text有错,Combo1.Text的内容已存在于组合框中
D、应把程序倒数第3行中的Ifflag=1改为lf flag=0
答案
D
解析
本题中首先用一个循环遍历组合框的所有列表项,依次取出每一个列表项与strl进行比较,若相同则删除该项,将flag置为1,否则flag为0:循环结束后如果flag的值为0则说明没有任何一个现有的列表项与strl相同,需要将strl添加到组合框中,否则不需添加。
转载请注明原文地址:https://kaotiyun.com/show/SGUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有工程文件sjt3.vbp。程序运行时的窗体如图3-185(a)所示。输入商品名称后,选中一种付款方式,则“成交”按钮变为可用,选择一种或多种“服务”后,单击“成交”按钮,则把相应信息显示在下面的图片框中,如图3-185(b)所示。若不选任何
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Ch1的复选框数组,含三个复选框,它们的Index属性分别为0、1、2,标题依次为“体育”
在考生文件夹下有一个工程文件sjt3.vbp。程序运行时,单击窗体则显示如图3-155所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画一个名称Shape1的形状控件,在属性窗口中将其设置为圆形。画一个名称为List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。
在考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的20个整数读入数组a中,同时显示在Text1文本框中;②单击“变换”按钮,则数组a中元素的位置自动对调(即第一个数组元素
考生文件夹下的工程文件sjt4.vbp中有如图3-161所示的控件。程序功能如下:程序运行时,在Text1中输入一个商品名称,在Text2中输入一个数量,单击“计算”按钮,则会在列表框中找到该商品的单价,乘以数量后显示在Text3中(如图3-161所示);
某人编写如下函数来判断a是否为素数,若是,则函数返回True;否则返回False。Functionprime(aAsInteger)AsBooleanDimkAsInteger,isprimeAsBoolean
在窗体上有一个名称为Label1的标签和一个名称为Timer1的计时器,并编写有如下几个事件过程:PrivateSubFormLoad()Timer1,Enabled=FalseTimer1.Interval=_____
函数过程F1的功能是:如果参数a为奇数,则返回值为1,否则返回值为0。以下能正确实现所述功能的代码的是()。
在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(
随机试题
A.病例对照研究B.队列研究C.临床试验研究D.理论流行病学研究E.现况调查研究某小学有大批的学生发生不明原因的腹泻。为了寻找病因及流行的线索。首先应进行的研究是
下列哪项不是黏液表皮样癌中的肿瘤细胞
与木防己汤联用可提高疗效的是可以与黄连、黄柏的西药是
(2014年)2008年1月,A公司与B公司签订书面合同,将其房屋出租给B公司,租期5年,月租金5万元,每年1月底前一次付清全年租金。2009年1月,经A公司同意,B公司与C公司订立书面合同,将该房屋转租给C公司,租期4年,月租金8万元。根据约定,C公司的
鲁菜即山东菜,是我国北方历史悠久、影响最大的一个菜系,有北方代表菜之称。()
下列句子中,成语使用正确的一项是()。
“王道”曾经是一个被历史污名化的词语,从古代“霸王道杂之”为治术的帝王,到现代宣称“王道”的伪满洲国,使“王道”成为专制的代名词之一。但是,如果稍微具有历史常识,便会看到,“王道”实际上是儒家政治学说的普遍主义表述,与“霸道”相对。而王道政治,在现代社会可
1999年10月2日,A市甲商贸公司将盖有本单位公章的介绍信和空白合同书以及10万元定金交给公司职员楚某,委托其到相邻B市的乙商场购买空调100台,声明每台定价不得超过4000元。10月3日,楚某找到乙商场,出具了甲商贸公司的已填上购买空调内容的介绍信
认知失调理论的首次提出者是()。
私の国、インドネシアは一年中暑いところなので、私はまだ雪を一度も見たことがありません。日本へ来れば、雪が見られると思っていたのに、私が住んでいる横浜では冬になっても雪がぜんぜん降りません。友達は2月になると、ときどき雪が降ると言っていました。雪で電車がとま
最新回复
(
0
)