首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
2019-03-14
60
问题
编写如下程序:
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/mEUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于线性链表的叙述中,正确的是
下面描述中错误的是
在E-R图中,用来表示实体联系的图形是
要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是
若要使文本框能够输入多行文本,应该设置的属性是
(1)考生文件夹中有工程文件sjt3.vbp。在窗体上有名称为Combol的组合框,请设置该组合框的属性,使该组合框只能用于选择操作,不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项,如图5(A)所示,
在学校中,“班级”与“学生”两个实体集之间的联系属于()关系。
以下关系表达式中,其值为True的是
数据结构中,与所使用的计算机无关的是数据的()。
某二叉树共有150个结点,其中有50个度为1的结点,则()。
随机试题
再生障碍性贫血的发病机制和以下哪项无关
方位术语中小腿内侧常称为
下列哪项符合有关血管壁的描述
A.右雷佐生B.奥美拉唑C.雷尼替丁D.维生素B6E.维生素K1由华法林导致的高危出血倾向,可选用()。
目前,我国的政府、非营利组织及事业单位都采用权责发生制。()
【2015年河北石家庄.简答】什么是隐性课程.隐性课程包括哪几方面.
左边给定的是纸盒外表面的展开图,右边哪一项能由它折叠而成?()
有一批长度分别为3、4、5、6和7厘米的细木条,它们的数量足够多,从中适当选取3根木条作为三角形的三条边,可能围成多少个不同的三角形?()
Theworldisonthetopofastaggeringriseinthenumberofoldpeople,andtheywilllivelongerthaneverbefore.【C1】_______
【S1】【S10】
最新回复
(
0
)