首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有一个命令按钮Command1,编写如下事件代码: Private Sub Command1_Click() S="ABBACDDCBA" For i=6 To 2 Step -2 x=Mid(s,i,i)
在窗体上有一个命令按钮Command1,编写如下事件代码: Private Sub Command1_Click() S="ABBACDDCBA" For i=6 To 2 Step -2 x=Mid(s,i,i)
admin
2013-01-07
30
问题
在窗体上有一个命令按钮Command1,编写如下事件代码:
Private Sub Command1_Click()
S="ABBACDDCBA"
For i=6 To 2 Step -2
x=Mid(s,i,i)
y=Left(s,i)
z=Right(s,i)
z=x&y&z
Next i
MsgBox z
End Sub
运行窗体后,单击命令按钮,则消息框输出的结果是( )。
选项
A、AABAAB
B、ABBABA
C、BABBAB
D、BBABBA
答案
D
解析
在VBA中包含三种取子串函数,①Left()函数表示在字符串左端开始取n个字符;②Right()函数表示在字符串右端开始取n个字符,并且子串中字符的顺序与母串相同;③Mid()函数表示在任意位置取任意长度的子串。本题中每次循环都会为z赋一口新值Right(s,i),所以在最后一次循环中z才有意义,最后当i=2时,选项D正确。
转载请注明原文地址:https://kaotiyun.com/show/bCup777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在下列原型所示的C++函数中,按"传值"方式传递参数的是()。
有如下程序:#include#includeusingnamespacestd;classMyBag{public:MyBag(stringbr
下列程序运行后的结果为()。#includevoidmain(){inta=1,b=2;boolc=1:if
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
有两个关系R,S如下:由关系R通过运算得到关系S,则所使用的运算为( )。
数据库系统在其内部具有3级模式,用来描述数据库中全体数据的全局逻辑结构和特性的是()。
使用VC6打开考生文件夹下的proj1工程目录内的proj1.dsw文件,其中在编辑窗口内显示的主程序文件中定义有Xabe类和主函数main。在程序文本中位于每行"//ERROR**********found**********下面的一行有错误,请加以更正
一棵二叉树的前序遍历结果是ABCEDF,中序遍历结果是CBAEDF,则其后序遍历的结果是()。
使用VC6打开考生文件夹下的源程序文件modi2.cpp。请完成函数fun(char*data),此函数的功能是,找出字符串数组中最小的ASCII值,如果有相同变量,则输出最后一个所在的位置;如果字符串为空,则返回一1;或者不存在时也返回一1。注
下列关于线性链表的描述中,正确的是()。I、只含有一个指针域来存放下一个元素地址II、指针域中的指针用于指向该结点的前一个或后一个结点(即前件或后件)III、结点由两部分组成:数据域和指针域。
随机试题
色彩的重量感主要取决于色彩的:
患者外感风寒湿邪,恶寒发热,肌表无汗,头痛项强,肢体酸楚疼痛,口苦而渴,治疗应选用()
A.二级医院B.专科医院C.一级医院D.除二级、三级医院以外的其他医疗机构根据《医疗机构药事管理规定》的规定,设置药房的是()
一氧化碳中毒病情严重的危重信号是()
当高压厂用电电压为10kV及3kV两级时,关于电动机容量和电压选择原则的叙述正确的是()。
根据预算法律制度的规定,经国务院批准,省、自治区、直辖市政府可以适度举借债务,举借的债务只能用于特定支出。该特定支出是()。
甲公司为依公司法设立的有限责任公司,乙公司为依中外合资经营企业法设立的有限责任公司。下列有关甲、乙两公司区别的表述中,不正确的有()。
如对影响财务报表的重大事项无法实施必要的审计程序,获取充分、适当的审计证据,但已取得管理当局声明,在不考虑其他因素的情况下,注册会计师应当( )。注册会计师应当获取审计证据,以确定管理层认可其按照适用的会计准则和相关会计制度的规定编制财务报表的责任,
下列诗句与光现象对应正确的是()。
symptoms此处讲的是文化冲击现象的症状:“Homesickness,stress,fearandconfusionareallsymptomsofcultureshock.”,因此答案为symptoms。
最新回复
(
0
)