首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim a$, b$, c$, c1$, c2$ a = InputBox("请输入一个字符串") b = InputBox("再输入另一个字符串")
编写如下程序: Private Sub Command1_Click() Dim a$, b$, c$, c1$, c2$ a = InputBox("请输入一个字符串") b = InputBox("再输入另一个字符串")
admin
2020-07-22
77
问题
编写如下程序:
Private Sub Command1_Click()
Dim a$, b$, c$, c1$, c2$
a = InputBox("请输入一个字符串")
b = InputBox("再输入另一个字符串")
c = ""
For k = 1 To IIf(Len(a) < Len(b), Len(b), Len(a))
c1 = IIf(k <= Len(a), Mid(a, k, 1), "")
c2 = IIf(k <= Len(b), Mid(b, k, 1), "")
c = c & c1 & c2
Next k
Print c
End Sub
程序运行后,单击命令按钮Command1,然后从键盘依次输入字符串:"12345678"、"ABCDE",则输出结果是
选项
A、A1B2C3D4E5678
B、1A2B3C4D5E678
C、12345678ABCDE
D、ABCDE12345678
答案
B
解析
程序定义了a,b,c,c1,c2五个字符串,将"12345678"、"ABCDE"两个输入的字符串赋值分别给a,b,将空字符赋值给c。IIF函数,IIF(条件,True部分,False部分)如果条件为真,IIF函数返回True部分,当条件为假时,返回False部分。程序通过IIf(Len(a) < Len(b), Len(b), Len(a)),求得a,b两个字符串的最大的长度为8,For循环中的k从1到8。在For循环中,通过字符串截取函数Mid,给c1,c2赋值。Mid(s,n1,n2)指从s的第n1个字符开始,向后截取n2个字符。在前五次执行循环体(当k值不大于5时),a、b的第k个字符构成的字符串分别赋值给c1、c2,并将c,c1,c2连接起来赋值给c。当k大于5时,通过Mid函数,将a的第k个字符构成的字符串赋值给c1,空字符串赋值给c2,并将c,c1,c2连接起来赋值给c。5次循环后c="1A2B3C4D5E",在第6次到第8次循环中,c1值依次为"6"、"7"、"8",,完成循环,c为"1A2B3C4D5E678",故选项B正确。
转载请注明原文地址:https://kaotiyun.com/show/QVHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框:PrivateSubCommand1_Click() CD1.DialogTitle="打开文件" CD1.InitDir="C:" CD1.Filte
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图1所示),就可以把文本框中的内容写到文件Out.txt中,每次写入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是()。
设有以下程序代码:PrivateSubCommand1_Click()StaticaAsIntegerprocaPrintaEndSubSubproc(xAsInteger)x=x+
下列叙述中正确的是( )。
现有程序如下:OptionBase1PrivateSubForm_Click() Dimx(5,6)AsInteger,y(5)AsInteger Fori=1To5 Forj=1To6 x(i
下列叙述中正确的是( )。
对于循环队列,下列叙述中正确的是( )。
以下选项中,不合法的VisualBasic的变量名是()。
设a是整型变量,与函数IIf(a>0,-a,a)有相同结果的代数式是()。
随机试题
Thepopulationofthedevelopedcountriesisdeclining,while______ofthedevelopingcountriesisgrowing.
下列哪项不是肝门静脉的属支
5岁小儿,体重20kg,24小时尿量1000ml。血BUN6.8mmol/L,肌酐75μmol/L,泼尼松治疗,尿Cr3490μmol/L。该小儿内生肌酐清除率为
对胸膜腔积液最有病理学诊断意义的检查是
A.玄麦甘桔颗粒B.锡类散C.板蓝根茶D.复方鱼腥草片E.利咽颗粒咽喉肿痛患者证属风热外袭,宜选用的中成药是()。
改、扩建机场工程,现有一条跑道的机场,可布设()个监测点。
生产经营单位的主要负责人在本单位发生重大安全生产事故时,不立即组织抢救或者在事故调查处理期间擅离职守或者逃匿的,给予()。
每季度应检查和试验火灾自动报警系统的功能,下列说法正确的是()。
Beforetheflighttakesoff,allpassengers(ask)______tofastentheirseatbelts.
A、Atalawyer’soffice.B、Atalibrary.C、Atapostoffice.D、Atanairport.C
最新回复
(
0
)