首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
如图5所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)中输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹
如图5所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)中输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹
admin
2016-11-12
36
问题
如图5所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)中输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配项;若未找到,则在Text2中显示“查无此人”,在横线处应填写( )。
Private Sub Command1_Click()
Dim k As Integer,n As Integer,found As Boolean
found=False
n=Len(Text1.Text):k=0
While k
If Text l=LeftS(List 1.List(k),n)Then
Text2=________
found=True
End If
k=k+1
Wend
IfNot found Then
Text2="查无此人"
End If
End Sub
选项
A、List1.Text
B、List1.List(k1
C、List1.ItemData(k)
D、List1.Text(k)
答案
B
解析
本题考查字符串函数。首先要测定查找对象的长度,接下来在列表框中进行查找,找到则在Text2中显示List1.List(k)的值,因此第一空处应为Text2=List1.List(k)。
转载请注明原文地址:https://jikaoti.com/ti/eTy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序的功能是将多维数组a(1Tom,1Ton)中的元素转移到一个名为b(1Ton)的一维数组中,请填写空白处,完成该程序。OptionBase1PrivateSubCommandl_Click()
衡量软件的模块独立性使用耦合性和内聚性两个定性的度量标准,其中______________是度量一个模块功能强度的一个相对指标。
设已经在窗体上添加了一个通用对话框控件CommonDialog1,以下语句正确的是()。
以下对文件分类的划分不正确的是()。
程序运行后,利用冒泡法对数组a中的数据按从小到大排序。请在空白处填上适当的内容,将程序补充完整。PrivateSubForm_load()Dima(1To5)AsIntegera(1)=20:a(2)=25
在面向对象方法中,信息隐蔽是通过对象的_____________性来实现的。
窗体上有一个名称为Optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程PrivateSubOptionl_Click(IndexAsInteger)…EndSub下面关
设置定时器控件的Interval属性为2000,Enabled属性为True,并且有下面的事件过程,程序运行时计算机将发出()次Beep声。SubTimer1_Timer()BeepEndSub
关系模型允许定义3类数据约束,下列不属于数据约束的是()。
随机试题
制作与播出电视广告的要求有哪些?
关于上肢动脉造影的叙述,正确的是
关于世界银行咨询服务评审方法中固定预算下的选择方法(FBS)的说法,正确的是()。
图示直径为20mm、长5m的管道自水池取水并泄入大气中,出口比水池水面低2m,已知沿程水头损失系数λ=0.02,进口局部水头损失系数ζ=0.5,则泄流量Q为:
“原材料”、“库存商品”等存货类明细账,一般不采用()账簿。
教育科学研究属于()。
反向诱导是指政府、媒体等主体所采取的措施或者宣传活动。在实际的社会生活中不但没有收到预期的效果,反而导致了与预期相反的社会现象大量出现。根据上述定义,下列属于反向诱导的是:
学习的作用可以体现在哪些方面?
Isanation’sdestinysetbyitsfertilityrates?Japanhastheworld’soldest【C1】______,butJapaneselongevitycan’t【C2】______
下列关于栈叙述正确的是()。
最新回复
(
0
)