首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下事件过程: Private Sub Form_Load() Show Dim Arr() As Variant Arr = Array(1, 3, 5, 7, 9, 11, 13, 15) Call converse(
有如下事件过程: Private Sub Form_Load() Show Dim Arr() As Variant Arr = Array(1, 3, 5, 7, 9, 11, 13, 15) Call converse(
admin
2015-06-30
50
问题
有如下事件过程:
Private Sub Form_Load()
Show
Dim Arr() As Variant
Arr = Array(1, 3, 5, 7, 9, 11, 13, 15)
Call converse(Arr)
For i = 0 To 7
Print arr(i);
Next i
End Sub
以上程序的功能是,通过调用Converse过程,将数组Arr中的元素逆序存放并输出。过程Converse的正确代码是
选项
A、Private Sub converse(dim a() as Variant )
Dim T
For i = LBound(A) To UBound(A)
T = a(i)
a(i) = a(UBound(A) - i)
a(UBound(A) - i) = T
Next i
End Sub
B、Private Sub converse(dim a() as Variant)
Dim T
Dim J As Integer
J = (LBound(A) + UBound(A)) / 2
For i = LBound(A) To J
T = a(i)
a(i) = a(UBound(A) - i)
a(UBound(A) - i) = T
Next i
End Sub
C、Private Sub converse(a() As Variant)
Dim T
For i = LBound(A) To UBound(A)
T = a(i)
a(i) = a(UBound(A) - i)
a(UBound(A) - i) = T
Next i
End Sub
D、Private Sub converse(a() As Variant)
Dim T
Dim J As Integer
J = Int((LBound(A) + UBound(A)) / 2)
For i = LBound(A) To J
T = a(i)
a(i) = a(UBound(A) - i)
a(UBound(A) - i) = T
Next i
End Sub
答案
D
解析
采用for循环的方式,实现将数组元素逆序排列,判断循环终止的条件为数组A的最小下标和最大下标和的一半,并且定义变量T,作为中间变量用来互换中心对称的元素。故正确答案为选项D。
转载请注明原文地址:https://kaotiyun.com/show/iNQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果在立即窗口中执行以下操作:______。a=8(是回车键,下同)b=9printa>b则输出结果是______。
以下说法错误的是______。
下面程序运行后,窗体中显示【】。PrivateSubCommand1_Click)()aS="*":b$="$"Fork=1To3x$
在VisualBasic中,下列运算符中优先级最高的是______。
在窗体中添加一个名称为Command1的命令按钮和一个名称为text1的文本框,然后编写如下程序;()PrivateSubCommandl_Click()Dimx,y,zAsIntegerx=5:y=
数据库管理系统DBMS中用来定义模式、内模式和外模式的语言是______。
对于顺序存储的队列,存储空间大小为n,头指针为F,尾指针为R。若在逻辑上看成一个环,则队列中元素的个数为______。
下列关于线性表的叙述中,不正确的是______。
设x=4,y=8,z=7,表达式x>zOrz<X的值是()。
以下关系表达式中,其值为False的是
随机试题
结构性社会问题是指社会制度或社会政策失调诱发的社会问题,属于结构性问题的是()
AnUnwelcomeGuestMaggiewasverygladthatJameswasnotafrequentvisitortothehouse.Sofarasthechildrenwereconce
肺动脉瓣关闭不全最常见的病因是
A.丹栀逍遥散B.半夏厚朴汤C.柴胡疏肝散D.甘麦大枣汤郁证之痰气郁结证,宜选用
基础墙的防潮层,当设计无具体要求,宜用1:2水泥砂浆加适量防水剂铺设,其厚度宜为()mm。
背景A施工单位总包一炼钢厂项目,其中的连铸安装工程分包给B安装公司,该公司及时组建了项目部,项目部在组织施工过程中发生以下情况:情况一:项目部按工业安装工程质量验评项目划分规定对安装工程项目进行了划分,其中有连铸安装工程、机械设备安装工
设随机变量X的分布律为则Y=X2+2的分布律为________.
在Pthread线程包的使用中,当用户编程创建一个新的线程时,需要使用的线程库函数是()。
有如下程序:#includeusingnamespacestd;classBase{intm;public:Base(){cout
Astrangethingabouthumansistheircapacityforblindrage.Rageispresumablyanemotionresultingfromsurvivalinstinct,b
最新回复
(
0
)