首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2019-03-14
60
问题
窗体上有一个名称为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/wZFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于过程及过程参数的叙述中,错误的是
设程序中分别将a、b、c、d定义为布尔型、整型、字符串型、日期型变量,下列赋值语句错误的是
设有名称为p的Sub过程首行,其形式参数是一维整型数组,以下定义语句中正确的是
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
下面对对象概念描述正确的是
在窗体上画两个单选按钮,名称分别为Option1、Option2,标题分别为"宋体"和"黑体";1个复选框(名称为Check1,标题为"粗体")和1个文本框(名称为Text1,Text属性为"改变文字字体"),窗体外观如图所示。程序运行后,要求"宋体"单选
有如下程序:PrivateSubForm_Click() DimiAsInteger,nAsInteger Fori=1To20 i=i+4 n=n+i Ifi>10ThenExitFor
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是( )。
在关系模型中,每一个二维表称为一个
随机试题
单相桥式整流电路中每只二极管承受的反向电压是单相全波整流时的________。
下面关于竞争者的说法中正确的是()
当阀门与管道以法兰或螺纹方式连接时,阀门应在()状态下安装。
根据《公路工程质量监督规定》,建设单位或者项目法人在完成开工前各项准备工作之后,应当在办理施工许可证前()日,按照交通运输部的有关规定到质监机构办理公路工程施工质量监督手续。
工资、薪金所得,以每月收入额减去费用()元后的余额为应纳税所得额。
在试算平衡表上,虽然实现了期初余额、本期发生额和期末余额三栏的借贷平衡关系,但仍然不能保证账户记录是完全正确的。()
216,125,64,27,8,()
下列诗词中表现已进监狱贪官心态的是:下列诗词中表现期待肃贪的诗词是:
WillWeTakeVacationinSpaces?WhenMikeKellyfirstsetouttobuildhisownprivatespace-ferryservice,hefiguredhis
Questions1-4Thetexthas7paragraphs(A-G).Whichparagraphcontainseachofthefollowingpiecesofinformation?*
最新回复
(
0
)