首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command 1 Click() Dim a(10)As String s="123456" n=Len(s) For k=1 To n a(k)=Mid(s,k,1) Next k For i=1
编写如下程序: Private Sub Command 1 Click() Dim a(10)As String s="123456" n=Len(s) For k=1 To n a(k)=Mid(s,k,1) Next k For i=1
admin
2020-01-02
62
问题
编写如下程序:
Private Sub Command 1 Click()
Dim a(10)As String
s="123456"
n=Len(s)
For k=1 To n
a(k)=Mid(s,k,1)
Next k
For i=1 To n\2
t=a(i)
a(i)=a(n-i+1)
a(n-i+1)=t
Next i
For k=1 To n
Print a(k);
Next k
End Sub
程序运行后,单击命令按钮Command1,输出结果为
选项
A、654321
B、123456
C、654123
D、123654
答案
A
解析
本题中有三个For循环,但是这三个循环之间没有嵌套关系,而是顺序的关系。在第一个循环中依次取出字符串s中的每一个字符存入数组a;第二个循环中将数组的第一个元素和最后一个元素互换,第二个元素和倒数第二个元素互换……以此类推完成数组的逆序;第三个循环输出数组元素。
转载请注明原文地址:https://kaotiyun.com/show/Z1Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下不能设置Picture属性的控件是
以下关于控件的叙述中,正确的是
假定一个工程由一个窗体文件Form1和两个标准模块文件Model1和Model2组成Model1的代码如下:PublicxAsInteger:Publicy,AsIntegerSubS1()SubS
在窗体上画一个文本框,名称为Text1,然后编写如下程序:PrivateSubForm_Load()Text1.Text=””:Text1.SetFocusEndSubPrivateSubForm_Click()Dim
设程序中有以下语句:MsgBox”Visual”,,”Basic”,”等级考试”,2执行该语句后,显示一个信息框,以下关于该信息框的叙述中,正确的是
在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,如图所示,对应的事件过程是()。
在文本框控件中,将Text的内容全部显示为用户所定义的字符的属性是()。
在数据库系统中,数据模型包括概念模型、逻辑模型和()。
在长度为n的顺序表中查找一个元素,假设需要查找的元素有一半的机会在表中,并且如果元素在表中,则出现在表中每个位置上的可能性是相同的。则在平均情况下需要比较的次数大约为()。
对软件系统总体结构图,下面描述中错误的是()。
随机试题
行车中当驾驶人意识到机动车爆胎时,应在控制住方向的情况下采取紧急制动,迫使机动车迅速停住。
下列关于Internet网中主机、IP地址和域名的叙述,错误的是________。
β受体阻滞剂治疗心绞痛的机制包括
下列主要用于表面麻醉的药是
下列何项是青春期开始的重要标志( )
张三、李四、王五、赵六、周七五人为研究生同学,2010年7月份研究生毕业时,五人商议欲创立一家经营法律类图书的英杰有限责任公司。五人订立了设立公司的协议,约定张三以2010年6月份依据遗嘱继承的其祖父所留给他的临街的一处二层商业房作为出资;李四以货币10万
甲企业向乙银行申请贷款,约定还款日期为2020年12月30日。丙企业为该债务提供了保证担保,但未约定保证方式和保证期间。后甲企业申请展期,与乙银行就还款期限作了变更,还款期限延至2021年12月30日,但未征得丙企业的书面同意。展期到期,甲企业无力还款,乙
以下旅游资源是按功能分类的有()
____________。中国人在太空迈出的每一步,都是科技创新的坚实足印。没有创新驱动,就不会有航天工程的突飞猛进;没有创新驱动,就不会有空间技术、空间应用和空间科学的蓬勃发展。尊重科学、追求卓越,这是中国航天精神,更是大众创业、万众创新背景下转型升级的
五代花鸟画家黄筌和徐熙分别创造了不同的绘画风格,人称“黄家富贵,_______。”
最新回复
(
0
)