首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。 Private Sub Command1 Cliek() D
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。 Private Sub Command1 Cliek() D
admin
2017-11-27
62
问题
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。
Private Sub Command1 Cliek()
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/j5Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果在C盘当前文件夹下已存在名称为studata.dat的顺序文件,那么执行语句Open"c:\studata.dat"ForAppendAs#1之后,将
要在窗体Form1中定义一个可以在窗体Form2中使用的整型变量X,可在Form1窗体的通用部分输入语句()。
滚动条控件的LargeChange属性所设置的是______。
下面程序运行时,若输入“VisualBasicProgramming”。则在窗体上输出的是PrirateSubCommand1_Click()Dimcount(25)AsInteger,chAsStringch=UCase(Input
在代码中定义了一个子过程:SubP(a,B)...EndSub下面______调用该过程的格式是正确的。
某二叉树的先根遍历序列为CEDBA,中根遍历序列为DEBAC,则其后根遍历序列为【】。
下列选项中属于面向对象设计方法主要特征的是
将E-R图转换为关系模式时,实体和联系都可以表示为
语句:PrintInt(Rnd*5+20)的输出不可能是
随机试题
明末文坛最杰出的诗人是__________。明末因抗清而牺牲的少年诗人是__________。
WhenIwasabout12Ihadanenemy,agirlwholikedtopointoutmyshortcomings.Weekbyweekherlistgrew:Iwasskinny,Iw
KUB片的含义是
胞宫通过胞脉、胞络直接与
2001年,我国城镇居民家庭人均可支配收入达6860元,比1996年增长()%,年平均增长7.23%。
采用高新技术要注意国家有关部门对高新技术的要求,这些要求不包括______要求。
下列关于国家助学贷款风险补偿金管理的说法,错误的是()。
某卷烟厂(地处县城)2007年12月销售卷烟900箱,取得不含税销售额150万元。其当月应纳城建税和教育费附加为()。(卷烟比例税率为45%,定额税率为150元/箱)
在教师信息输入窗体中,为职称字段提供“教授”“副教授”“讲师”等选项供用户直接选择,最合适的控件是()。
Manyschool-busdriversinNorthAmericaassignseats,keepsuspectedbulliesclosetothefront.
最新回复
(
0
)