首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
admin
2019-06-20
23
问题
窗体上有一个名称为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://jikaoti.com/ti/ClN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体上有一个名称为List1的列表框和一个名称为Check1的复选框数组(下标从0开始)。程序运行时,单击某个复选框,如果列表框中没有该复选框的标题,则把该复选框的标题添加到列表框中,否则从列表框中把该复选框标题删除。IfCheck1(Index).
能够存放组合框的所有项目内容的属性是
设a=4,b=5,c=6,执行语句Printa<bAndb<c窗体上显示的是
下列关于线性表的叙述中,不正确的是()。
设:a=12,b=5,c=7,表达式x=(a\c+aModb)+Int(13/5)的值是
表达式2*3^2+4*2/2+3^2的值是
以下关系表达式中,其值为True的是
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1标题为“选课”的窗体上画一个复选框数组,名称为CH1,共有四个复选框,按顺序其标题分别是“数学”、“语文”、“外语”、“计算机”,其中“语文”、“计算机
以下能对正实数d的第3位小数四舍五入的表达式是
随机试题
行车中发现左侧轮胎漏气时怎样处置?
《银行业从业人员职业操守》规定的银行业从业人员不包括()
关于代扣代缴、代收代缴税款账簿,下列说法中正确的是()。
企业在销售收入确认之后发生的销售折让(不属于资产负债表日后事项),应冲减确认收入期闸的收入。()
经()批准,可以查询从事生产、经营的纳税人、扣缴义务人在银行或者其他金融机构的存款账户。
()对于湿地相当于稀土对于()
设曲线y=在(x0,y0)处有公切线(如图3—7所示),求这两曲线与x轴围成的平面图形绕x轴旋转而成的旋转体的体积V。
A、 B、 C、 D、 D
Morepeopledieoftuberculosis(结核病)thanofanyotherdiseasecausedbyasingleagent.Thishasprobablybeenthecaseinquit
【S1】【S9】
最新回复
(
0
)