首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim aS,b$,c$,k% a=”ABCD” b=”123456” c=””
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim aS,b$,c$,k% a=”ABCD” b=”123456” c=””
admin
2010-11-02
37
问题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
Private Sub Command1_Click()
Dim aS,b$,c$,k%
a=”ABCD”
b=”123456”
c=””
k=1
Do While k<=Len(a) Or k<=Len(b)
If k<=Len(a)Then
c=c&Mid(a,k,1)
End If
If k<=Len(b)Then
c=c&Mid(a,k,1)
End If
k=k+1
Loop
Print c
End Sub
运行程序,单击命令按钮,输出结果是( )。
选项
A、123456ABCD
B、ABCDl23456
C、D6C584A321
D、A182C3D456
答案
D
解析
Mid函数用于提取字符串中的指定位数,函数调用格式为Mid(string,start[,length]),其中start为必要参数。为Long型,为被取出部分的首字符的位置。如果start超过string的字符数,Mid返回空串。length可选参数为返回的字符数,如果省略或length超过文本的字符数,将返回字符串中从start到尾端的所有字符。Len函数的作用是返回串的长度。本题中a串长4,b串长6,每次循环将a、b的第k个字符取出连在一起给串c,k从1开始,当k=5时,将b中k位置的字符依次插入串c中。
转载请注明原文地址:https://kaotiyun.com/show/E0mp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列选择项中不属于结构化程序设计原则的是
阅读下面程序publicclassTestimplementsRunnable{ privateintx=0; privateinty=0; booleanflag=true; publicst
请完善程序(程序文件名:Java_2.java)并进行调试。请在下画线处填入正确内容,然后删除下画线。请勿删除注释行和其他已有的语句内容。[题目要求]创建一个整型数组,并将其值打印输出。运行结果为:0123456
C语言是面向过程的语言,Java语言是面向______的语言。
下列叙述中正确的是
下列代表八进制整数的是()。
Applet要响应键盘的操作,应该在init()方法中加入(设键盘事件监听者就是Applet自身)的语句是______。
二元算术表达式的两个操作数全是short类型的数据,则表达式的结果是()。
“商品”与“顾客”两个实体集之间的联系一般是
J2SE作为一种应用和开发环境,提供了一整套实用工具,其中( )是Java语言的编译工具。
随机试题
离子色谱法测定氯化物、氟化物等阴离子时,含有机物水样可经过()柱过滤除去。
乳腺癌出现"酒窝征"的机制是
A.舒咳枇杷糖浆B.新癀片C.消渴丸D.脉君安片E.痰咳净散中成药中含格列本脲成分的药物是
燃气管道的严密性试验持续时间一般不少于()h,实际压力将不超过允许值为合格。
采用公允价值模式计量的投资性房地产转为成本模式时,按照会计政策变更处理。()
踢球助跑的作用如何?
为了树立省会的文明形象并提升城市品位,××市人民政府出台了“二环线以内禁止中巴营运”的文件。市政府要求:(1)公交部门新增300辆豪华公交车和400~600辆高档的士;(2)部分原由中巴车运营的线路将由公交车代替,客流不足的线路将由政府
Thispassagecouldbeentitled______.WhichofthefollowingisNOTtrueaboutStevie’schildhood?
ThemenuatSpyce,whichopenstodayindowntownBoston,isn’tnoticeablydifferentthanthemenusyou’dfindatahalf-dozenot
SocialNetworkingAlargebutlong-in-the-toothtechnologycompanyhopingtobecomeabiggerforceinonlineadvertisingbuys
最新回复
(
0
)