在窗体上画一个命令按钮，然后编写如下程序： Option Base 1 Private Sub Command 1_Click() Dim Arr(10)As Integer For i=1 To 10 Arr(i)=11-i Next i

admin2018-10-18 41

问题在窗体上画一个命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command 1_Click()
Dim Arr(10)As Integer
For i=1 To 10
Arr(i)=11-i
Next i
x：InputBox("输入一个整数(3～10)")
PrintArr(2+Arr(x))
End Sub
程序运行后，单击命令按钮，在输入对话框中输入17，则输出结果为

选项 A、3
B、4
C、5
D、6

答案C

解析本题是一个简单的数组操作，首先在一个循环中为数组元素赋值，然后输出指定的数组元素值。最终输出的是Arr(2+Arr(7))=Arr(6)=5。

转载请注明原文地址:https://kaotiyun.com/show/wRFp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

窗体上有一个名称为Command1的命令按钮。其单击事件过程如下：PrivateSubCommand1_Click()Open"c:\f1.txt"ForInputAs#1Open"c:\f2.txt"ForOut
下列关于通用对话框CommonDialog1的叙述中，错误的是(　　)。
下列关于栈的叙述正确的是(　　)。
设有如下通用过程：PublicFunctionFun(xStrAsString)AsString　　DimtStrAsString，strLAsInteger　　tStr＝""　　strL＝Len(xStr)　　i＝strL
现有如下一段程序：PrivateSubCommand1_Click()　　x＝UCase(InputBox("输入："))　　SelectCasex　　　　Case"A"To"C"　　　　　　Print"考核通过！"　　　　
窗体上已有1个名称为Picture1的图片框，要求实现下面2个功能之一：（1）在窗体上移动鼠标时，立即将Picture1显示在鼠标位置（2）在窗体上单击鼠标时，立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
窗体上有一个名称为Picture1的图片框控件，一个名称为Label1的标签控件，如图所示。现有如下程序：PublicSubdisplay(xAsControl)　　IfTypeOfxIsLabelThen　　　　xCapti
A、DYBEAFCZXB、YDEBFZXCAC、ABDYECFXZD、ABCDEFXYZC前序遍历是指在访问根结点、遍历左子树与遍历右子树这三者中，首先访问根结点，然后遍历左子树，最后遍历右子树；并且，在遍历左右子树时，仍然先访问根结点，然后遍历左
设a＝2，b＝3，c＝4，d＝5，表达式Nota

随机试题

通过保险和社会保障机制对经济与社会生活中的各种风险进行的补偿、防范或管理，体现金融机构的（）
反映项目财务状况的主要指标有()。
如果乙公司没有按照合同的约定支付材料款，则(　　)。《根据合同法》规定，违约责任除另有规定外，实行(　　)原则。
下列分配完工产品成本与在产品成本的方法中，能使某种产品本月发生的生产费用就是本月完工产品成本的有()。
下列属于面试中应聘者目标的是()
如图，已知双曲线C：一y2=1(a＞0)的右焦点为F，点A，B分别在C的两条渐近线上，AF⊥x轴，AB⊥OB，BF／／OA(O为坐标原点)．求双曲线C的方程；
计算累次积分I=∫01dx∫1—x2—xe(x+y)2dy+∫12dx∫02—xe(x+y)2dy。
LatelyIhavebeennoticingthegreatnumberofelectricalappliances(电器)onthemarket.Itseemstomethatthereare【C1】_____
【B1】【B6】
A、Heisagoodfriendwiththespeakers.B、Hedoesn’tsupportthesameteamasthespeakers.C、Heisusuallypessimistic.D、Hei

最新回复(0)

在窗体上画一个命令按钮，然后编写如下程序： Option Base 1 Private Sub Command 1_Click() Dim Arr(10)As Integer For i=1 To 10 Arr(i)=11-i Next i

二级VB

NCRE全国计算机二级

窗体上有一个名称为Command1的命令按钮。其单击事件过程如下：PrivateSubCommand1_Click()Open"c:\f1.txt"ForInputAs#1Open"c:\f2.txt"ForOut

下列关于通用对话框CommonDialog1的叙述中，错误的是( )。

下列关于栈的叙述正确的是( )。

设有如下通用过程：PublicFunctionFun(xStrAsString)AsString DimtStrAsString，strLAsInteger tStr＝"" strL＝Len(xStr) i＝strL

现有如下一段程序：PrivateSubCommand1_Click() x＝UCase(InputBox("输入：")) SelectCasex Case"A"To"C" Print"考核通过！"

窗体上已有1个名称为Picture1的图片框，要求实现下面2个功能之一：（1）在窗体上移动鼠标时，立即将Picture1显示在鼠标位置（2）在窗体上单击鼠标时，立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是

窗体上有一个名称为Picture1的图片框控件，一个名称为Label1的标签控件，如图所示。现有如下程序：PublicSubdisplay(xAsControl) IfTypeOfxIsLabelThen xCapti

A、DYBEAFCZXB、YDEBFZXCAC、ABDYECFXZD、ABCDEFXYZC前序遍历是指在访问根结点、遍历左子树与遍历右子树这三者中，首先访问根结点，然后遍历左子树，最后遍历右子树；并且，在遍历左右子树时，仍然先访问根结点，然后遍历左

设a＝2，b＝3，c＝4，d＝5，表达式Nota

通过保险和社会保障机制对经济与社会生活中的各种风险进行的补偿、防范或管理，体现金融机构的（）

反映项目财务状况的主要指标有()。

如果乙公司没有按照合同的约定支付材料款，则( )。《根据合同法》规定，违约责任除另有规定外，实行( )原则。

下列分配完工产品成本与在产品成本的方法中，能使某种产品本月发生的生产费用就是本月完工产品成本的有()。

下列属于面试中应聘者目标的是()

如图，已知双曲线C：一y2=1(a＞0)的右焦点为F，点A，B分别在C的两条渐近线上，AF⊥x轴，AB⊥OB，BF／／OA(O为坐标原点)．求双曲线C的方程；

计算累次积分I=∫01dx∫1—x2—xe(x+y)2dy+∫12dx∫02—xe(x+y)2dy。

LatelyIhavebeennoticingthegreatnumberofelectricalappliances(电器)onthemarket.Itseemstomethatthereare【C1】_____

【B1】【B6】

A、Heisagoodfriendwiththespeakers.B、Hedoesn’tsupportthesameteamasthespeakers.C、Heisusuallypessimistic.D、Hei

下列关于通用对话框CommonDialog1的叙述中，错误的是(　　)。

下列关于栈的叙述正确的是(　　)。

设有如下通用过程：PublicFunctionFun(xStrAsString)AsString　　DimtStrAsString，strLAsInteger　　tStr＝""　　strL＝Len(xStr)　　i＝strL

现有如下一段程序：PrivateSubCommand1_Click()　　x＝UCase(InputBox("输入："))　　SelectCasex　　　　Case"A"To"C"　　　　　　Print"考核通过！"　　　　

窗体上有一个名称为Picture1的图片框控件，一个名称为Label1的标签控件，如图所示。现有如下程序：PublicSubdisplay(xAsControl)　　IfTypeOfxIsLabelThen　　　　xCapti

如果乙公司没有按照合同的约定支付材料款，则(　　)。《根据合同法》规定，违约责任除另有规定外，实行(　　)原则。