首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_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
编写如下程序: Private Sub Command1_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
admin
2019-07-30
87
问题
编写如下程序:
Private Sub Command1_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);
blext k
End Sub
程序运行后,单击命令按钮Command1,输出结果为
选项
A、654321
B、123456
C、654123
D、123654
答案
A
解析
第一个For循环从字符串s中提取数字,赋值给数组a的元素。第二个For循环对数组a中的元素实现倒序排列。第三个For循环实现打印。选A。
转载请注明原文地址:https://kaotiyun.com/show/4iUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimIAsInteger,nAsIntegerFori
在窗体上画一个命令按钮和两个标签,其名称分别为Command1、Label1和Label2,然后编写如下事件过程:PrivateSubCommand1_Click()a=0Fori=lTo10a=a+l:b
执行以下程序段a$="abbacddcba"Fori=6To2Step-2X=Mid(a,i,i):Y=Left(a,i)z=Reght(a,i):z=UCase(XYz)Nexti
设有如图所示窗体和以下程序:PirintSubCommand1_Click()Text1.Text="VisualBasic"EndSubPrivateSubTextLostFocus()If
在标准模块中用Public关键字定义的变量,其作用域为
设窗体文件中有下面的事件过程:PrivateSubCommand1_Click()Dims:a%=100:PrintaEndSub其中变量a和s的数据类型分别是
下面定义窗体级变量a的语句中错误的是
设有如下变量声明语句:Dima,bAsBolean则下面叙述中正确的是
为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为
随机试题
东方公司为增值税一般纳税人,适用增值税税率17%。该公司生产经营A产品,A产品的单位售价为500元(不含税),单位成本为350元。2009年3月份该公司发生的交易或事项有:(1)向本市某商场销售A产品60台,价税款收妥存入银行。(2)按合同规定销售给外
胡适说,有三个杂志可代表三个时代,可以说是创造了三个时代:一是《时务报》,一是《新民丛报》,一是《新青年》。这三个时代共同的特点是()。
医院职工如何预防医院感染的发生?
《金匮要略》温经汤的组成药物是大补元煎的药物组成是
工程项目质量控制系统只用于( )的质量控制。
()不是商用房贷款贷前调查人在调查申请人时应重点注意的内容。
活动开始很久了,但是小朋友还是吵吵闹闹,此时你会怎么办?
幼儿园课程的()强调的是个性化,目标指向培养儿童的创造性。
单位新招了一批公务员,领导让你组织带队去一家先进单位参观学习,你要如何组织?
中国人民银行宣布,自2013年7月20日起全面放开金融机构贷款利率管制。然而,只有存款利率上限放开,才能真正实现利率市场化。如果政府不主动放弃自己的支配力,市场力量就难以发挥作用。一旦存款利率上限放开,银行间就会展开利率大战,导致金融风险上升。如果金融风险
最新回复
(
0
)