首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序: Private Sub Commandl_Click() Dim st
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序: Private Sub Commandl_Click() Dim st
admin
2017-06-22
55
问题
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序:
Private Sub Commandl_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.Lisc(k)中从头开始寻找s。找不到则返回0,否则返回s在List1.List(k)的位置。整个循环体的功能是,从列表框中最后一个列表项开始寻找含有与Text1中输入的字符串相同的子串,如果存在相同的子串,则把List1.List(k)全部连接到str中。
转载请注明原文地址:https://kaotiyun.com/show/aDGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下程序,查找并输出该数组中的最小值,请在空白处填上合适的代码,将程序补充完整。OptionBase1PrivateSubCommand1_Click()Dimarr1DimMinAsInteger,i
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=""str
设有如下通用过程:PublicFunctionf(xAsInteger)DimyAsIntegerx=20y=2f=x*yEndFunction在窗体上画一个名称为Co
关闭当前的工程并退出VisualBasic的快捷键是
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:optionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4,5)
如果文本框的Locked属性设置为True,则下列说法正确的是()。
对关系S和R进行集合运算,结果中既包含S中的所有元组也包含R中的所有元组,这样的集合运算称为()。
关系R和S进行自然连接时,要求R和S含有一个或多个公共______。
设有数组定义语句:Dima(5)AsInteger,List1为列表框控件。下列给数组元素赋值的语句错误的是
菜单编辑器窗口的编辑区中共有7个按钮,其中向右的箭头表示______。
随机试题
下列各项叙述正确的是()
[2012年第007题,2008年第042题]《设计结合自然》和《设计结合气候》两本书的作者分别是:
函数y=C1e-x+C2(C1,C2为任意常数)是微分方程y’-y’2y=0的()。
工程咨询服务的投标文件通常采用“建议书”的形式,包括技术建议书和()。
某企业2001年年末敏感资产总额为4000万元,敏感负债总额为2000万元。该企业预计2002年度的销售额比2001年度增加10%(即增加100万元),预计2002年度留存收益的增加额为50万元,则该企业2002年度应追加资金量为()万元。
商业房贷款的借款人变更还款方式,不需要满足的条件是()。
2013年1月1日,A公司为其100名管理人员每人授予100份股票期权,当符合行权条件后,每持有l份股票期权可以以每股5元的价格购买本公司1股普通股股票,每份期权在2013年1月1日的公允价值为24元。第一年年末能够行权的条件为公司当年净利润增长率达到20
人民警察必须严格依法办案,依法管理,不办或少办“人情案”“关系案”,不为私情、私利做不合法的事,坚持法律面前人人平等的原则。()
A—taxationsystemB—taxationC—fiscalchargesD—progressivetaxationE—graduatedtaxF—valuead
A、Thelowefficiencyoftheiroperation.B、Competitionfromothermodesoftransport.C、Constantcomplaintsfrompassengers.D、T
最新回复
(
0
)