首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
如图5所示,在列表框Listl中已经有若干人的简单信息,运行时在Textl文本框(即”查找对象”右边的文本框)中输入一个姓或姓名,单击”查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹
如图5所示,在列表框Listl中已经有若干人的简单信息,运行时在Textl文本框(即”查找对象”右边的文本框)中输入一个姓或姓名,单击”查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹
admin
2018-09-19
66
问题
如图5所示,在列表框Listl中已经有若干人的简单信息,运行时在Textl文本框(即”查找对象”右边的文本框)中输入一个姓或姓名,单击”查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配项;若未找到,则在Text2 中显示”查无此人”,在横线处应填写( )。
Private Sub Command l_Click( )
Dim k As Integer,n As Integer,found As Boolean
found=False
n=Len(Textl.Text)
k=0
While k<List 1.ListCount And Not found
If Textl=Left$(Listl.List(k),n)Then
Text2=________
found=Tlue
End If
k=k+1
Wend
IfNot found Then
Text2=“查无此人”
EndIf
End Sub
选项
A、Listl.Text
B、Listl.List(k)
C、Listl.ItemData(k)
D、Listl.Text(k)
答案
B
解析
考查字符串函数。首先要测定查找对象的长度,因此,第一空处应为:n=Len(Textl.Text),接下来在列表框中进行查找,找到则在Text2中显示Listl.List(k)的值,因此,第二空处应为Text2=Listl.List(k)。
转载请注明原文地址:https://kaotiyun.com/show/DbFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹中有一个工程文件sjt5.vbp,如图6所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签|b|First中;同时计算矩阵主对角线的元素之和,计算结果显
将文本框的()属性设置为True时,文本框可以输入或显示多行文本,且会自动换行。
PrintRight("VBProgramming",2)语句的输出结果是( )。
假定有如下情况语句:SelectCaseX能表示|X|>5的Case子句是
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘输入正整数到文本框中。在“除数”框架中选择一个单选按钮,然后单击“处理数据”命令按钮,将大于文本框中的正整数,并且能够被所选除数整除的5个数添加到列表框List1中,如图所示。在窗体文
函数表达式Sgn(-10)的值是
在软件开发中,需求分析阶段可以使用的工具是( )。
下面的数写成普通十进制数是()。2.65358979335278D-6
8.6787E+8写成普通的十进制数是()。
随机试题
在静息状态海平面呼吸空气条件下,诊断呼吸衰竭的指标之一是PaO2值
以下关于双缩脲法测定总蛋白的说法错误的是
对含氟牙膏的防龋效果进行研究。将若干名学生随机分成两组,一组用含氟牙膏,另一组用普通牙膏,3年后观察其防龋效果。这种研究方法为
影响地面水水质最主要的因素是
3.4g/dl,WBC27170个/μl,中性粒细胞0.875,血小板62000个/μl。B超:子宫前位4.0cm×4.2cm×3.1cm,内膜0.4cm,双卵巢3cm×2cm×2cm,多泡,最大径0.8cmC,宫颈黏液结晶会看到
在下列患者中,护士在书写交班报告时首先应写
在建设项目信息管理中,要求对有关信息的分类进行统一,这体现了信息管理应遵循的()原则。
在国际上,施工企业项目经理是()
手提式灭火器宜设置在灭火器箱内或挂钩、托架上,其顶部离地面高度不应大于()m。
Thebenefitsofquittingsmoking—reducedriskofcancerandmanyotherhealthproblems—areknown.Butformillionsofsmokers,t
最新回复
(
0
)