首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。 Private Sub Command1_Click() Dim str A
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。 Private Sub Command1_Click() Dim str A
admin
2018-05-08
24
问题
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有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-1To0Step-1
If InStr(List1.List(k),s)>0Then
str=str&List1.List(k)&" "
End If
Nextk
Ifstr=" "Then
Text2="没有匹配项目"
Else
Text2=str
End If
End Sub
程序运行时,在Text1中输入"京",单击命令按钮,则在Text2中显示的内容是( )。
选项
A、京
B、北京 南京
C、南京 北京
D、没有匹配的项目
答案
C
解析
本题考查循环程序的分析以及列表框属性的应用。函数InStr(Ljst1.List(k),s)的作用是在List1.List(k)中从头开始寻找s,找不到就返回0,否则返回s在List1.List(k)中的位置。整个循环的功能是,从列表框中最后一个列表项开始寻找含有与Text1中字符串相同的子串,如果存在相同的子串,把List1.List(k)全部连接到str中,并显示在Text2中。
转载请注明原文地址:https://jikaoti.com/ti/0oy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
VisualBasic程序中分隔各语句的字符是
执行以下程序段后,变量c$的值为______。a$="VisualBasicProgramming"b$="Quick"c$=b$&UCase(Mid$(a$,7,6))&Right$(a$,12)
下列叙述中正确的是
“商品”与“顾客”两个实体集之间的联系一般是
下列数据结构中,能够按照“先进后出"原则存取数据的是
下列描述中错误的是
数据字典(DD)所定义的对象都包含于
下面程序运行后,语句”Printi”执行的次数是()。PrivateSubForm_Click()DimiAsInteger,jAsIntegeri=0Doi=i+1Forj=10To1Step-3
在名称为Forml的窗体上画一个名称为CD1的通用对话框,通过属性窗口设置CD1的初始路径为C:\,默认的文件名为None,标题为“保存等级考试”,如图2所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjt1.f
在考生文件夹中有工程文件sjt3.vbp,其中的窗体如图2-46所示。程序刚运行时,会生成一个有10个元素的整型数组。若选中”查找最大值”(或”查找最小值”)单选按钮,再单击”查找”按钮,则找出数组中的最大值(或最小值),并显示在标签Label2中。请去
随机试题
Telephone,television,radio,andtheInternethelppeoplecommunicatewitheachother.Becauseofthesedevices,ideasandnews
生殖健康的内涵,不包括
隐隐作痛,喜按喜揉者属( )痛甚于胀,或刺痛者属( )
如图6-47所示,半圆形明渠,半径为r0=4m,其水力半径R为()m。
下列关于商业银行的业务范围,正确的有()。
依法执教就是依法治教。()
“互联网+”正在由外向内嵌入式地“加压”人们的生活方式,从根本上改变生产过程、体验、权力和文化的运作与结果。________,“互联网+”同样给消费领域带来了________的变化。填入画横线部分最恰当的一项是:
A、 B、 C、 D、 B
某计算机的CPU主频为500MHz,CPI为5(即执行每条指令平均需5个时钟周期)。假定某外设的数据传输率为0.5MB/s,采用中断方式与主机进行数据传送,以32位为传输单位,对应的中断服务程序包含18条指令,中断服务的其他开销相当于2条指令的执行时间。请
Aestheticsisbroaderinscopethanthephilosophyofart,whichcomprisesoneofitsbranches.【21】Itdealsnotonlywiththena
最新回复
(
0
)