首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下事件过程: 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
56
问题
有如下事件过程:
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全国计算机二级
相关试题推荐
在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1、Text2,然后编写如下程序:PrivateSubCommand1_Click()a=Text1.Textb=Text2.
能够获得一个文本框中被选取文本的内容的属性是______。
设窗体Form1中有一名为mnuFile的菜单,它只有一个标题为Open的子菜单。为使程序运行时,按下Alt+F键窗体中能够显示如下图所示的菜单项,则mnuFile的标题应为______.
假如用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是
设a=2,b=3,c=4,d=5,则表达式Nota<=cOr4*c=b^2Andba+c的值是
下面关于完全二叉树的叙述中,错误的是______。
以下关系表达式中,其值为False的是
用二维表来表示实体及实体之间联系的数据模型称为______。
设置复选框中或单选按钮的标题对齐方式的属性是______。
复选框的Value属性为0时,表示该复选框()。
随机试题
重力式码头棱体抛填断面的平均轮廓线不得小于设计断面,顶面和坡面的表层应铺0.3~0.5m享度的(),其上再铺倒滤层。
纤溶系统的成分有
成年男性,于急性胰腺炎恢复期做超声检查,于胰腺体尾部探及11cm×8cm边界清晰、包膜完整、较薄的囊性病变,最可能的诊断是
男性,29岁。咳大量脓痰并反复咯血10年,多次住院治疗。查体:左下肺湿啰音,心率86次/分,律齐。如胸部X线检查检查见左下肺不规则透亮阴影,下列哪项可进一步确诊
腰椎滑脱、腰椎椎弓狭部骨不连、脊柱裂分别首选的摄影体位是
在保证膨润土拌合土层满足抗渗设计要求的前提下,节约成本的最佳做法有()。
质量事故的处理过程包括事故调查及事故原因分析和()。
在保本点上,()。
公安执法监督的基本特征有()。
法西斯党“进军罗马后,墨索里尼对新闻界采取了什么措施?
最新回复
(
0
)