首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为conunandl的命令按钮,并有以下程序。 Private Sub Command1_Click()
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为conunandl的命令按钮,并有以下程序。 Private Sub Command1_Click()
admin
2017-08-22
73
问题
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为conunandl的命令按钮,并有以下程序。
Private Sub Command1_Click()
Dim str As String,s As String,k As Integer
s=TeXtl:str=""
For k=List1.ListCount-1 To 0 Step-1
If InStr(List1.List(k),s)>0 Then
str=str &List1.List(k)&" "
End If
Next k
Ifstr=""Then
Text2="没有匹配项目"
Else
Text2=str
EndIf
End Sub
程序运行时,在Text1中输入”京”,单击命令按钮,则在Text2中显示的内容是( )。
选项
A、京
B、北京南京
C、南京北京
D、没有匹配的项目
答案
C
解析
本题考查循环程序的分析以及列表框属性的应用。函数InStr(List1.List(k),s)的作用是在List1.List(k)中从头开始寻找s,找不到就返回0,否则返回s在List1.List(k)中的位置。整个循环的功能是,从列表框中最后一个列表项开始寻找含有与Text1中字符串相同的子串,如果存在相同的子串,把List1.List(k)全部连接到str中,并显示在Text2中。
转载请注明原文地址:https://kaotiyun.com/show/xtGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列语句错误的是
单击命令按钮时,下列程序代码的执行结果为PublicSubProcl(nAsInteger,ByValmAsinteger)n=nMod10m=m\10EndsubPrivateSubComm
如果A为整数且|A|>=10,则打印“OK”,否则打印“Error”,表示这个条件的单行格式If语句是()。
建立打开文件、保存文件、颜色、字体、打印对话框所使用的方法分别为【】、【】、ShowColor、ShowFont和ShowPrinter。
为了显示一个窗体,所使用的方法为【】;为了隐藏一个窗体,所使用的方法为【】。
单击一次命令按钮后,下列程序的执行结果为 PrivateSubCommand1_Click() DimmAsInteger,IAsInteger,x(10)AsInteger ForI=0To4:x(I)=I+1
如果准备读文件,打开顺序文件“text.dat”的正确语句是
下列四个关于DoEvents语句的叙述中,正确的是______。
设计数据库的存储结构属于()。
若某二叉树的前序遍历访问顺序是abdgcefh,中序遍历访问顺序是dgbaechf,则其后序遍历的结点访问顺序是
随机试题
下列选项中,不发生纤维样坏死的是
肢体困重,痿软无力,下肢痿弱为甚,手足麻木,扪之微热,喜凉恶热,胸脘痞闷,治疗该证的代表方为
按建设程序分类,定额可分为()。
根据大坝的结构特点和设计要求,为达到选取恰当的防渗措施和校验建筑物在渗流作用下是否安全的目的,不一定都进行()的计算。
2012年3月1日,李某去某商场购物时,将自己携带的两件物品存放在存包处,当天取物时却只取到一件。存包员否认李某存了两件物品。双方争议未果,李某拟起诉至人民法院。根据民法基本理论的规定,李某向人民法院提起民事诉讼的有效期间是()。
下列关于合营安排的表述中,正确的是()。
在风险分散过程中,随着资产组合中资产数目的增加,分散风险的效应会越来越明显。()
解不等式组.
数据的物理结构在计算机存储空间中的存放形式称为数据的【】。
わたしはきょう6時に会社________出ます。
最新回复
(
0
)