首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim i As Integer, n As Integer Dim arr() As Integer n = InputBox("请输入数值:") ReDi
编写如下程序: Private Sub Command1_Click() Dim i As Integer, n As Integer Dim arr() As Integer n = InputBox("请输入数值:") ReDi
admin
2015-06-30
52
问题
编写如下程序:
Private Sub Command1_Click()
Dim i As Integer, n As Integer
Dim arr() As Integer
n = InputBox("请输入数值:")
ReDim arr(n)
For i = 1 To UBound(arr)
arr(i) = i
Next
For i = 1 To UBound(arr) \ 2
temp = arr(i)
arr(i) = arr(n - i + 1)
arr(n - i + 1) = temp
Next
For i = 1 To UBound(arr)
Print arr(i);
Next
End Sub
程序运行后,单击命令按钮Command1,并在输入对话框中输入7,输出结果为
选项
A、7 6 5 4 3 2 1
B、1 2 3 4 5 6 7
C、3 2 1 4 7 6 5
D、4 3 2 1 5 6 7
答案
A
解析
第一个For循环,是对arr(7)赋值,此时arr(7)=[0,1,2,3,4,5,6,7]。第二for循环用来对下标1到7的arr数组,进行以下标为4的数组元素为中心的,对调,结果arr(7)=[0,7,6,5,4,3,2,1]。故选择A项。
转载请注明原文地址:https://kaotiyun.com/show/zwQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在磁盘C的根目录下有一个名为Sco.dar的文件,内容为姓名、英语成绩、物理成绩、数学成绩,现依此文件在根目录中建立一个名为Aver.dat的文件,内容为姓名及三门课的平均成绩,但程序不完整,请在______处补充。Open"C:\Sco.dat"
下列说法正确的是
以下叙述中正确的是
下列语句用于打开一个顺序文件Open"C:\MyFile.txt"ForOutPut,但该语句的一个重要错误是没有()。
为了使命令按钮(名称为Command1)右移200,应使用的语句是
下面程序运行时,内层循环的循环总次数是ForM=1To3ForN=0ToM-1NextNNextM
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员,从职员到部门的联系类型是
设A="12345678",则表达式Val(Len(A,4)+Mid(A,4,2))的值为______。
用树形结构来表示实体之间联系的模型称为______。
下列说法不正确的是()。
随机试题
根据图Ⅲ-7所示门电路及输入电压波形,画出E、F、P端的电压波形。
USSignsGlobalTobaccoTreaty1TheUnitedstateshastakenthefirststeptowardapprovingaglobaltobaccotreatythatpr
A.急性化脓性胆囊炎B.急性化脓性胆管炎C.急性坏死性胰腺炎D.急性化脓性阑尾炎Charcot三联征出现于
A.酰胺类生物碱B.有机胺类生物碱C.异喹啉类生物碱D.莨菪烷类生物碱E.喹啉类生物碱阿托品的结构属于
有清血分之热作用的方剂是
该病人的休克状态应属于首先考虑的治疗措施为
如果是连续审计业务,在下列情况下,需要A注册会计师提醒被审计单位甲公司管理层关注或修改现有业务的约定务款的是()。
互易二端口网络满足()。
Mendifferfromanimals_______theycanthinkandspeak.
Whyyoushouldn’ttrytobeamorningpersonA)We’veallhearditbefore:tobesuccessful,getoutofbedearly.Afterall,
最新回复
(
0
)