首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,其名称为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
31
问题
在窗体上画一个命令按钮,其名称为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://jikaoti.com/ti/vog0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
阅读下面代码intx=3;while(x<9)x+=2;x++:while语句成功执行的次数是______。
请完善程序(程序文件名:Java_3.java)并进行调试。请在下画线处填入正确内容,然后删除下画线。请勿删除注释行和其他已有的语句内容。[题目要求]本题的要求是填三个空,改两个错。该程序是两个整数进行比较,由考生通过输入窗口分别输
下列关于线程和进程的说法正确的是
下列的变量定义语句中,合法的是
顺序存储方法是把逻辑上相邻的结点存储在物理位置【】的存储单元中。
类是一个支持集成的抽象数据类型,而对象是类的【】。
Swing构件必须添加到Swing顶层容器相关的
按覆盖的地理范围进行分类,计算机网络可以分为()。
键盘键入字符串并在计算机屏幕上显示,这时的数据源是______。
和AWT有关的所有事件类都是从类()派生而来。
随机试题
材料1“大道至简,实干为要”便是这样一条质朴哲理。事无论大小,都是靠脚踏实地、一点一滴干出来的。生活中,一些人埋头苦干深挖一眼泉,最终收获了实至名归的成功;一些人左顾右盼寻栽捷径,反而兜兜转转、屡尝败绩。“见之不若知之,知之不若行之”。做人做事,最怕的
A.室性期前收缩三联律B.成对室性期前收缩C.多形室性期前收缩D.多源室性期前收缩E.室性并行心律在一个正常心室收缩后连续发生二个室性期前收缩,并依次重复
平片检查显示颅底结构的最佳体位是
A.溃疡较深,边缘不整,基底有浸润B.溃疡与刺激物相邻,周缘有白色水肿C.溃疡基底暗红色桑葚样肉芽肿,边缘鼠啮状D.溃疡较小,表面微凹陷,少量黄色渗出,周围充血E.溃疡深达黏膜下层,边缘高起,咽部及口角可见瘢痕创伤性溃疡的溃疡特点为()
下列关于房地产广告的表述中,符合有关规定要求的有()。
由于化学材料配制成的浆液中不存在固体颗粒灌浆材料那样的沉淀问题,故化学灌浆都采用()。
杜鹃花是我国三大天然名花之一,有“花中西施”之称,下列诗句描述杜鹃花的是()。
Oneofthereallystartlingthingsabouttoday’sdecisionontheAffordableCareActisthatthewholebroccoliissue.Onemight
某Word文档中有一个5行×4列的表格,如果要将另外一个文本文件中的5行文字拷贝到该表格中,并且使其正好成为该表格一列的内容,最优的操作方法是
WhichofthefollowingstatementsisINCORRECTaccordingtothenewsitem?
最新回复
(
0
)