首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有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
56
问题
窗体上有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全国计算机二级
相关试题推荐
将窗体的KeyPreview属性设为True,然后编写如下程序:PrivateSubForm_KeyDown(KeyCode—PrivateSubForm_KeyPress(KeyAsciiAsInteger,ShiftAsInteger
若要使文本框能够输入多行文本,应该设置的属性是
某人编写了下面的程序PfivateSubCommandl_Click()PrivateSubpro(nAsInteger)DimaAsInteger,bAsIntegerWhile(n>0
假定已在窗体上画了多个控件,其中有一个被选中,为了在属性窗口中设置窗体的属性,预先应执行的操作是
以下关于图片框控件的说法中,错误的是
以下关系表达式中,其值为True的是
设a=10,b=4,c=5,d=7,表达式a>bAndNotc<d+6的值为
在下列关系运算中,不改变关系表中的属性个数但能减少元组个数的是
设有如下声明语句OptionBase1Dimarr(2,-1To5)AsInteger则数组arr中数组元素的个数是
下面描述中不属于数据库系统特点的是
随机试题
TheBeijingPeaceInternationalHotelWeoffertravelersawealthoffeaturesthatpromptareturnvisit.EASYACCESSIBI
恶露分为________、________、________三类。
A、Bitot斑B、Kayser-Fleischer环C、Fleischer环D、Vogt线纹E、Stocker线角膜后强性层蓝绿色环()
为确诊应作的检查是患儿确诊后治疗应选用
为研究45岁以上男性体重指数(BMI)≥25者糖尿病患病率是否高于体重指数
利用可观察到的借款人特征变量计算出一个数值(得分)来代表债务人的信用风险,并将借款人归类于不同的风险等级的模型是()。
设A,B是任意两个随机事件,则
一个基金公司为其客户提供几种不同的基金:一个货币市场基金,三种债券基金(短期债券、中期债券和长期债券),两种股票基金(适度风险股票和高风险股票)以及一个平衡基金.在所有只持有一种基金的客户中,持有各基金的客户比例分别为货币市场20%
以使用逻辑元器件为标志,大型机经历了4个阶段,其中第3代是()。
Thebookfromwhich"allmodemAmericanliteraturecomes"refersto______.
最新回复
(
0
)