首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。 Private Sub Command1 Click() Dim
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。 Private Sub Command1 Click() Dim
admin
2020-07-22
49
问题
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。
Private Sub Command1 Click()
Dim str As String,s As String,k As Integer
s=Text1: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
If str=""Then
Text2="没有匹配项目"
Else
Text2=str
End If
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/9JHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设Labell、Commandl、Textl、Checkl分别为标签、命令按钮、文本框、复选框的名称,则以下属性设置语句中,运行时不会出错的是
下列关于线性链表的叙述中,正确的是
下面不能在信息框中输出“VB”的是
窗体上有一个列表框控件List1。以下叙述中错误的是
设有下面程序代码:OptionBase1PrivateSubCommanmd1_Click()Dimx(6)a=Array(4,2,5,1,6,3)b=Array(64,24,98,27,58,41)Fork=1To6x(a(
在下列关系运算中,不改变关系表中的属性个数但能减少元组个数的是
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
在VisualBasic环境下设计应用程序时,系统能自动检查出的错误是
下列选项中不属于结构化程序设计原则的是( )。
一个教师可讲授多门课程,一门课程可由多个教师讲授。则实体教师和课程间的联系是( )。
随机试题
下列哪项不属于水火共制法
A.耐受性B.耐药性C.致敏性D.首剂现象E.生理依赖性反复使用抗生素,细菌会出现
资产负债表中,“应收账款”项目应根据()填列。
中国银行业协会的常务理事会由()等组成。
如果发现发言者的讲话内容与会议主题无关,会议主持人应()。
与传统教学方法相比,现代教学提倡()
在课外、校外教育中,教师处于()
实践是检验真理的唯一标准.并不排斥逻辑证明的作用。逻辑证明()
Inscience,atheoryisareasonableexplanationofobservedeventsthatarerelated.Atheoryofteninvolvesanimaginarymodel
OnPublicSpeakingI.People’sfrequentresponsetogivingtheirfirstspeech:feel【T1】______【T1】______II.Thespeaker’ss
最新回复
(
0
)