首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名为Listl的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Textl、Text2,1个名称为Commandl的命令按钮,并有以下程序。 Private Sub Commandl_Click( ) Dim
窗体上有1个名为Listl的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Textl、Text2,1个名称为Commandl的命令按钮,并有以下程序。 Private Sub Commandl_Click( ) Dim
admin
2019-06-20
25
问题
窗体上有1个名为Listl的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Textl、Text2,1个名称为Commandl的命令按钮,并有以下程序。
Private Sub Commandl_Click( )
Dim str As String,S As String,k As Integer
s=Textl:str=““
For k=List 1.ListCount-1 To 0 Step-l
If InStr(List 1.List(k),s)>0 Then
str=str&Listl.List(k)&”“
End If
Nextk
Ifstr=““Then
Text2=“没有匹配项目”
Else
Text2=str
EndIf
EndSub
程序运行时,在Textl中输入”京”,单击命令按钮,则在Text2中显示的内容是( )。
选项
A、京
B、北京南京
C、南京北京
D、没有匹配的项目
答案
C
解析
考查循环程序的分析以及列表框属性的应用。函数InStr(Listl.List(k),s)的作用是在Listl.List(k)中从头开始寻找s,找不到就返回0,否则返回s在Listl.List(k)中的位置。整个循环的功能是,从列表框中最后一个列表项开始寻找含有与Textl中字符串相同的子串,如果存在相同的子串,把Listl.List(k)全部连接到str中,并显示在Text2中。
转载请注明原文地址:https://jikaoti.com/ti/A9N0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在窗体上画出2个名称分别为Shape1、Shape2的形状控件,在属性窗口设置控件的属性,使得Shape1为圆角矩形,并填充红色(&H000000FF&);Shape2为
在窗体上有一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分别为Label1、Label2的标签(标题分别为空白和“共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化
在考生文件夹下有一个工程文件sit5.vbp,窗口有2个名称分别为Command1和Command2、标题分别为“读数据”和“排序”的命令按钮,有2个标题分别为“数组A”和“数组B”的标签。请将窗体标题设置为“完全平方数排序”;再画2个名称分别为Text1
下列数组定义中错误的是
下面程序在调试时出现了死循环PrivateSubCommand1_Click()n=InputBox(“请输入一个整数”)DoIfnMod2=0Thenn=n+1Elsen
在下列关系运算中,不改变关系表中的属性个数但能减少元组个数的是
下列与队列结构有关联的是
在窗体上画一个通用对话框,程序运行中用ShowOpen方法显示“打开”对话框时,希望在该对话框的“文件类型”栏中只显示扩展名为DOC的文件,则在设计阶段应把通用对话框的Filter属性设置为
某二叉树共有399个结点,其中有199个度为2的结点,则该二叉树中的叶子结点数为()。
下面的数写成普通十进制数是()。2.65358979335278D-6
随机试题
标准一致性检验一般需要受检者
吸气性呼吸困难表现为
某金融企业2008年会计利润总额为320万元,当期通过非营利组织向某贫困地区捐赠了一辆小汽车,汽车原价62万元,已经提取折旧12万元,在捐赠过程中发生了运费3.4万元,该汽车公允价值为60万元,假如当期无其他纳税调整事项,则调整后该企业当期的应纳税所得额为
熙天股份有限公司(本题下称“熙天公司”)系生产家用电器的上市公司,实行事业部制管理,有A、B、C、D四个事业部,分别生产不同的家用电器,每一事业部为一个资产组。熙天公司有关总部资产以及A、B、C、D四个事业部的资料如下:(1)熙天公司的总部资产为一级
某公司非常霞试产品定价工作。公司负责人强调,产品定价一定要正确反映企业产品的真实价值消耗和转移,保证企业简单再生产的继续进行,在下列定价方法中,该公司不宜采用的是()
(46)Basedonaccumulatedsocialresearch,therenowcanbelittledoubtthatsuccessfulandwell-adjustedchildreninmodemsoci
利用“文件夹属性”对话框的“共享”选项卡可以将文件夹设置为共享。
赋值表达式是由位于赋值运算符左边的变量和右边的________组成的。
有以下程序,其中k的初值为八进制数#include<stdio.h>>main(){intk=011;printf("%d\n",k++);}程序运行后的输出结果是
二进制数111111转换成十进制数是
最新回复
(
0
)