首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能: Private Sub Command1_Click()
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能: Private Sub Command1_Click()
admin
2020-07-22
54
问题
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:
Private Sub Command1_Click()
Dim n%.k%
n=Len(Text1.Text)
For k=0 To List1.ListCount-1
IfLeft(List1.List(k),n)=Text1.Text Then
List1.Removeltem k
End If
Nextk
End Sub
在调试时发现,如输入“陈”,可以正确删除所有姓“陈”的项目,但输入“刘”,则只删除了“刘邦”、“刘备”2项,结果如图2所示。这说明程序不能适应所有情况,需要修改。正确的修改方案是把For k=0
To List1.ListCount-1改为( )。
选项
A、For k=1 To List1.ListCount-1
B、For k=1 To List1.ListCount
C、For k=0 To List1.ListCount
D、Fork=List1.ListCount-1 To 0 Step-1
答案
D
解析
在程序运行时删除列表框中的项目可以使用RemoveItern方法,其语法为:列表框.RemoveItem索引号,列表框的属性ListIndex返回当前所选项目的索引号,因此删除列表框选中项目的语句为:List1.RemoveItemList1.ListIndex。列表框的List(Index)属性返回指定索引号的列表项内容,第一个列表项的索引为0而最后一个项目的索引为ListCount-1,其中,ListCount属性返回列表框中当前的列表项总数。
本题原代码错误原因:每执行一次RemoveItem方法后,列表框中被删除项目的后续项目的位置将前移,即其ListIndex属性值将减1。为此可从列表框的最后一个项目开始进行查找,即:For k=List1.ListCount-1 To 0 Step-1。
转载请注明原文地址:https://kaotiyun.com/show/w8Hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行以下程序段:a$="VisualBasicProgramming"b$="C++"c$=UCase(Left$(a$,7))&b$&Right$(a$,12)后,变量c$的值为()。
设窗体上有一个名称为Text1的文本框,并有下面的程序代码:PrivateSubForm_Load()KeyPreview=TrueEndSubPrivateSubForm_KeyPress(KeyAsciiAsInteger)Pr
设有如图所示窗体和以下程序:PrivateSubCommand1_Click() Text1.Text="VisualBasic"EndSubPrivateSubText1_LostFocus() IfText1.Text"B
下列叙述中正确的是
软件生命周期是指()。
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:PrivateSubCommand1_Click() Dima(10)AsInteger,maxAsInteger Fork=1To10 a(k)=In
文本框的Locked属性被设置为True后产生的效果是
下面关于菜单的叙述中正确的是
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
下列描述中,不符合良好程序设计风格要求的是
随机试题
呕血与黑便最常见的疾病是( )
男性,25岁。发现高血压2年,血压最高160/120mmHg,尿蛋白(++),BUN28.6mmol/L,Scr442μmol/L,红细胞2.6×1012/L。其诊断是()
我国宪法规定了国家主席的替补制度,下列选项中对替补制度的表述哪个是错误的?()
世界银行直属的发展机构组成包括()。
内部控制制度应当涵盖公司经营管理的各个环节,不得留有制度上的空白或漏洞,这体现了内部控制制度的()原则。
注册会计师为应对财务报表层次的重大错报风险,对拟实施审计程序的性质、时间安排和范围作出的下列总体修改,其中不恰当的是()。
根据物流服务企业提供的服务类型,可以把物流企业分为两类。一类是提供功能性物流服务业务的物流企业,另一类是()。
毛泽东指出.发展国民经济的总方针是()。
求内接于椭球面的长方体的最大体积.
Whydoestheprofessormentionaflute?
最新回复
(
0
)