首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序代码: Option Base 1 Private Sub Form_Click() Dim x.t Dim i As Integer Dim n As Integer x=Array(一8,20
编写如下程序代码: Option Base 1 Private Sub Form_Click() Dim x.t Dim i As Integer Dim n As Integer x=Array(一8,20
admin
2018-12-20
37
问题
编写如下程序代码:
Option Base 1
Private Sub Form_Click()
Dim x.t
Dim i As Integer
Dim n As Integer
x=Array(一8,20,15,10,一30,13,17)
n=UBound(x)
For i=1 To n/2
t=x(i)
X(i)=x(n—i+1)
x(n—i+1)=t
Next i
Print x(n)
End Sub
当程序运行时,单击窗体产生的输出结果为( )。
选项
A、20
B、17
C、lO
D、 一8
答案
D
解析
在程序开始之前,使用Option Base 1语句声明数组下标从1开始。在Form_Click事件过程中定义了默认数组x,然后使用Array函数给数组元素赋值,UBound函数可以获得数组下标的上限值,然后赋值给变量n,n=7。在For循环中变量i的初始值为1终止值为n/2,For循环体语句的功能是对数组首尾两个数进行互换,循环结束后数组中的元素依次为(17,13,一30,10,15,20,一8),故最后输出x(n)的值为数组最后一个元素的值,D选项正确。本题选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/0NFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypex aAsInteger bAsIntegerEndTypePrivateSubCommand1_Cli
窗体上有名称分别为Text1、Text2的文本框,名称为Command1的命令按钮。运行程序,在Text1中输入"FormList",然后单击命令按钮,执行如下程序:PrivateSubCommand1_Click() Text2.Text=U
在窗体上画一个名称为Combo1的组合框,名称为Text1的文本框,以及名称为Command1的命令按钮,如图所示。运行程序,单击命令按钮,将文本框中被选中的文本添加到组合框中,若文本框中没有选中的文本,则将文本框中的文本全部添加到组合框中。命令按钮的
编写如下程序:OptionBase1PrivateSubCommand1_Click() Dima a=Array(1,2,3,4) s=0:j=1 Fori=4To1Step-1 s=s+a(i)*
以下关于控件数组的叙述中,错误的是( )。
下面不属于软件测试实施步骤的是
设a=2,b=3,c=4,d=5,下列表达式的值是( )。
A、DYBEAFCZXB、YDEBFZXCAC、ABDYECFXZD、ABCDEFXYZC前序遍历是指在访问根结点、遍历左子树与遍历右子树这三者中,首先访问根结点,然后遍历左子树,最后遍历右子树;并且,在遍历左右子树时,仍然先访问根结点,然后遍历左
数据库管理系统是( )。
开发软件所需高成本和产品的低质量之间有着尖锐的矛盾,这种现象称做()。
随机试题
既能清热解毒,又能疏散风热的药物是
中国财务公司协会的宗旨是遵守国家宪法、法律法规和国家政策,遵守社会道德风尚,认真履行“自律、维权、协调、服务”的职责,促进会员单位实现共同利益,推动财务公司行业规范、稳健发展。()
简述美术教学评价的目的。
如果某一年的7月份有5个星期四,它们的日期之和为80,那么这个月的3日是星期几?
成语“草木皆兵”反映的历史事件是()。
中国共产党的根本宗旨和一切工作的根本出发点是()。
与经典测量理论的真分数模型有关的假设是()
Sinceyouhavepassedthe(drive)______test,youcandriveyourowncar.
()保付支票()管理费()指定银行()巡回信用证
______inthedoorway,thehouseappearedtobemuchsmallerthanithadseemedtousaschildrenmanyyearsago.
最新回复
(
0
)