首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
2020-02-27
34
问题
编写如下程序:
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/atTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
由关系R1和R2得到关系R3的操作是()。
编写如下程序:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=10y=20Callfun1(x,y)Printx:yEndSubPrivateFunctionf
要使得文件列表框File1中只显示文件扩展名为jpg的图片文件,则下列正确的语句是()。
(1)在名称为Form1的窗体上添加一个名称为Label1的标签,标签的宽和高分别为2000、300,有边框,并利用属性窗口设置适当的属性,使其标题“等级考试”居中显示,并使标签的外观如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名保存为
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,并单击“确定”按钮,则对文本框中的文字做相应的设置,如图3-100所示。窗体上的控件已经画出,但没有给出主要程序内容,请编写适当的事件过程,
窗体上有一个名称为Text1的文本框,一个名称为Combo1的组合框。将文本框中的内容添加到组合框中所使用的命令是
假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是()。
表达式Int(8*Sqr(36)*10^(-2)*10+0.5)/10的值是()。
设工程中有2个窗体:Form1、Form2,Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后,隐藏Form1,显示Form2。若口令为“XSLNCER
设有关键码序列(Q,G,M,Z,A,N,B,P,X,H,Y,S,T,L,K,E),采用堆排序法进行排序,经过初始建堆后关键码值B在序列中的序号是()。
随机试题
此孕妇何时去医院待产为宜如血糖控制良好,无其他合并症时,何时终止妊娠为宜
急性肾炎限盐饮食每日供盐
构件式玻璃幕墙安装,密封胶嵌缝施工正确的技术要求是()。
凡是具备相对独立完成会计数据输入、处理和输出功能模块的软件均可视为会计核算软件。()
SaveWaterWriteanessayof160-200wordsbasedonthedrawing.Inyouressay,youshould1)describethedrawingbrief
下列对数据访问页与Access数据库的关系的描述中正确的是()。
定义学生、教师和课程的关系模式S(S#,Sn,Sd,Dc,SA)(其属性分别为学号、姓名、所在系、所在系的系主任、年龄);C(C#,Cn,P#)(其属性分别为课程号、课程名、先修课);SC(S#,C#,G)(其属性分别为学号、课程号和成绩),则该关系为(
在考生文件夹下打开EXCEL.XLSX文件:(1)将工作表Sheet1命名为“降雨量统计表”,然后将工作表的A1:H1单元格合并为一个单元格,单元格内容水平居中;计算“平均值”列的内容(数值型,保留小数点后1位);计算“最高值”行的内容置B7:G
Jackoughtnotto______mehersecret,buthemeantnoharm.
Two-thirdsofAmericansareoverweightorobese.Developingcountriesarecatchingup.InChinanearly30%ofadultsaretoowid
最新回复
(
0
)