首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中文本框的名称为Text1、命令按钮的名称为Command1、组合框的名称为Combol,组合框中的列表项如图所示。 按钮的事件过程如下: Prirate Sub Command1_Click() Dim ch As Stri
窗体中文本框的名称为Text1、命令按钮的名称为Command1、组合框的名称为Combol,组合框中的列表项如图所示。 按钮的事件过程如下: Prirate Sub Command1_Click() Dim ch As Stri
admin
2018-09-19
48
问题
窗体中文本框的名称为Text1、命令按钮的名称为Command1、组合框的名称为Combol,组合框中的列表项如图所示。
按钮的事件过程如下:
Prirate Sub Command1_Click()
Dim ch As String,str As String
ch=Cornbol.Text
str=""
n=0
For k=Combol.ListCount-1 To 0 Step-1
IfLeft(Combol.List(k),Len(ch))=eh
Then
n=n+1
Else
str=str+Combol.List(k)
End If
Next k
Text1.Text:str
End Sub
程序运行后,在组合框的编辑区输入“程”(如图所示),再单击命令按钮,则在文本框中显示的是( )。
选项
A、程小军程忠程极宽
B、程极宽程忠程小军
C、刘士程程小军程忠程极宽李程程
D、李程程马燧李治张宏刘士程
答案
D
解析
本题考查Combox控件的属性和方法的使用,程序中定义了字符串变量ch和str,其中ch赋值为Combox中输入的汉字“程”,str的初始值为空字符串,程序进入For循环,循环变量k的初始值为Comboxl.ListCount-1,其中ListCount属性为组合框中的表项数量,表项从0开始,最后一项为Comboxl.ListCount-1,本题中Comboxl.ListCount一1为7,所以循环变量k的初始值为7终止值为0,循环共执行8次,循环执行过程如下:
当k=7时,if Left(Comboxl.List(k).Len(ch))=ch条件为假,执行语句str=str&Comboxl.List(k),str的值为“李程程”
当k=6时,if Left(Comboxl.List(k),Len(ch))=ch条件为假,执行语句str=str&Comboxl.List(k),str的值为“李程程马燧”
当k=5时,if Left((:omboxl.List(k),Len(ch))=ch条件为假,执行语句str=str&Comboxl.List(k),str的值为“李程程马燧李治”
当k=4时,if Left(Comboxl.List(k).Len(ch))=ch条件为真,执行语句n=n+1,n的值为1
当k=3时,if Left(Comboxl.List(k),Len(ch))=ch条件为真,执行语句n=n+1,n的值为2
当k=2时,if Left(Comboxl.List(k),Len(ch))=ch条件为假,执行语句str=str&Comboxl.List(k),str的值为“李程程马燧李治张宏”
当k=1时,if Left(Comboxl.List(k),Len(ch))=ch条件为真,执行语句n=n+1,n的值为3
当k=0时,if Left(Comboxl.List(k),Len(ch))=ch条件为假,执行语句str=str&Comboxl.List(k),str的值为“李程程马燧李治张宏刘士程”。
故本题D选项正确。本题选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/VbFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下通用过程:PublicSubFun(a0AsInteger,xAsInteger)Fori=1To4x=x*a(i)NextEndSub在窗体上i画一个名称为Text1的文本框和一个名称为Command1的命令按钮,
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序:PrivateSubCommand1Click()Dim
下面程序的运行结果是()。PrivateSubFormClick()i=0DoUntil0i=i+1Ifi>10ThenExitDoLoopPrintiEndSub
在窗体上有一个名称为Command1的命令按钮,并编写有如下事件过程:PriVateSubCommand1_Click()Move500,500EndSub 程序执行时,单击命令按钮,实现的功能是()。
以下过程的功能是从数组中寻找最大值:PrivateSubFindMax(a()AsInteger,ByRefMaxAsInteger) DimsAsInteger,fAsInteger DimiAsInteger
(1)在名称为Forml的窗体上画两个标签(名称分别为Labelll和Label2,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Textl和Text2,初始内容均为空)和一个命令按钮(名称为Commandl,标题为“显示”)。然后编写命令按钮的C
如果要将一个窗体从内存中清除,应使用的语句是
下列运算符中,优先级别最高的是
下面的数写成普通十进制数是()。
随机试题
公民在工作中应该恪尽职守,兢兢业业,克己奉公,服务社会。这是公民基本道德规范中()
经肾脏排泄的对比剂是
可与DVD合用用于治疗肠道细菌感染的磺胺药是()。
把图a所示的电路用图b所示的等效电压源代替,则等效电压源的参数为()。
营业税按照行业进行征收,实行的是比例税率,下列行业按照20%的税率缴纳营业税的是( )。
《刑法》中所规定的“国有公司、企业、事业单位人员失职罪"、“国有公司、企业、事业单位人员滥用职权罪”的共同犯罪主体是()。
组织文化是一种无形的、思想上的约束力量。这是组织文化的()。
税务机关在调查税收违法案件时,经设区的()税务局或分局的局长批准,可以查询案件涉嫌人员的储蓄存款。
简述知识的类型。
在Word中,选定一行文本的技巧方法是()。
最新回复
(
0
)