首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
如图所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)中输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配
如图所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)中输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配
admin
2020-04-18
75
问题
如图所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)中输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配项;若未找到,则在Text2中显示“查无此人”,在横线处应填写( )。
Private SUb Command1_Click( )
DimkAs Integer,nAs Integer,found
As Boolean
found=False
n=Len(Text1.Text):k=0
While k<List1.ListCoumAnd Not found
If Text1=Left$(List1.List(k),n)Then
Text2=____________
found=True
End If
k=k+1
Wend
IfNotfoundThen
Text2="查无此人"
End If
End Sub
选项
A、List1.Text
B、List1.List(k)
C、List1.ItemData(k)
D、List1.Text(k)
答案
B
解析
本题考查字符串函数。首先要测定查找对象的长度,接下来在列表框中进行查找,找到则在Text2中显示List1.List(k)的值,因此第一空处应为Text2=List1.List(k)。
转载请注明原文地址:https://kaotiyun.com/show/gfTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有名称分别为Textl、Text2的文本框,名称为Commandl的命令按钮。运行程序,在Textl中输入“FormList”,然后单击命令按钮,执行如下程序:PrivateSubCommandl_Click()
为使文本框具有初始值"VB",在设计阶段正确的操作是
执行下面的程序段后,变量S的值为()。S=5Fori=2.6To4.9Step0.6S=S+1Nexti
编写如下事件过程:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInterger,XAsSingle,YAsSingle)If(ButtonAnd3)=3ThenPrint“
运行如下程序:PrivateSubCommand1_Click()Dima(5,5)AsIntegerFori=1To5Forj=1To4a(i,j)=i*2+jIfa(i,
有下面程序代码:PrivateSubCommand1_Click()i=1DoWhilei<5j=1Doj=j+1Pr
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是()。
VB变量x!的数据类型是
随机试题
从理论上深刻地回答了当时困扰和束缚人们思想的一系列重大问题的是()
Iamoftenaskedtodescribetheexperienceofraisingachildwithadisability.Itislikethis.【C1】______youaregoingtohav
患者神疲乏力。少气懒言,常自汗出,头晕目眩,舌淡苔白,脉虚无力。其证候是()
分项工程合格质量的条件是,只要构成分项工程的( ),且均已验收合格,则分项工程验收合格。
纸质手册管理模式的主要特征是以( )为单元进行监管。
成本租金是由()和税金5项因素组成的。
只要教师认真备课.写好规范的教案,上课就一定受学生欢迎。()
A:Doyoufeellikedoinganythingthisweekend,Jerry?B:______
【2011-25】古罗马教育家西塞罗论述教育的主要著作是()。
Alotofpeopledon’twanttotalkabouttheirage,especially(尤其是)womenover30.Thethoughtofgrowingolderisapainful(痛苦的)
最新回复
(
0
)