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

admin2017-11-23 28

问题在窗体上画一个命令按钮，然后编写如下程序：
Option Base 1
Pfivme Sub Commandl_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
程序运行后，单击命令按钮，在输入对话框中输入7，则输出结果为

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

答案C

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

转载请注明原文地址:https://jikaoti.com/ti/xAy0FFFM

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

二级VB

NCRE全国计算机二级

相关试题推荐

下列程序段的执行结果为　　a=1　　b=2　　ForI=1To3　　　f=a*b　　　a=b　　　b=f　　　Printf　　NextI
下面程序的运行结果是PrivateSubCommand1_Click()x＝1:y＝1Fori=1To3x＝x+y:y＝y+xNexti:printx,yEndSub
在程序的空白行处填写适当的语句，完成下列功能；依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。DoWhileList2.ListCount______List2.RemoveItem0
下列()事件过程可以将打开文件对话框的标题改变为“newCaption”。
组合框有3种不同的类型，这3种类型是下拉式组合框、简单组合框、下拉式列表框，分别通过将【】属性设置为0、1、2宋实现。
以下叙述中正确的是()。
下列关于图片框控件的语句中不正确的是()。
在程序的空自行处填写适当的语句，完成F列功能：依次自动将列表榧List2巾所有列表硕目移入列表梃Listi巾。并将移人Listl中的项目从List2；f1删除。DoWhikList2ListCountList2．Removehem
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()　　DimiAsInteger,nAsInteger　　Fori
编写一个程序把一维数组的各元素反序存放。在主过程中调用subl过程把从键盘上输入的10个元素反序存放后再输出。根据题意，请完善下列程序。PrivateSubsubl(b()AsInteger,ByValnAsInteger)DimiA

随机试题

在血平板上菌落周围形成透明溶血环，称______。
患者，女性，74岁，2年前诊断肺心病，1周来咳嗽、咳痰、喘息加重，双下肢水肿。体检：肺内多量湿性啰音，心率100次/分，肝肋下2.5cm，双下肢水肿。白细胞计数及中性粒细胞分类均增高，血气分析：pH7.335，PaO250mmHg，PaCO278mmHg，
A、日受体阻滞药B、利尿药C、ACEID、钙拮抗药E、α1受体阻滞药原发性高血压合并糖尿病者首选
真正的有效通气量是（）
A、及时服B、饭前服C、清晨空腹服或睡前服D、睡前1～2h服E、晚上服用治哮喘的药物宜
与原发性肝癌的发生有关的肝病是
下面四个选项中,说法不正确的一项是()。
各交通等级要求的水泥混凝土()标准值不得低于《城镇道路工程施工与质量验收规范))CJJ1—2008的规定。
Duringthetraditionalweddingceremony,the【C1】______couplepromiseeachotherlifelongdevotion.Yet,aboutoneoutoffourAm
在Excel2007中，单元格Al、A2、A3、Bl中的值分别为56、97、121、86，若在单元格Cl中输入函数“=IF(B1＞A1，¨E¨，IF(B1＞A2，¨F¨，¨G¨))”，按回车键后，则Cl单元格中的值为(48)。

最新回复(0)

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

二级VB

NCRE全国计算机二级

下列程序段的执行结果为 a=1 b=2 ForI=1To3 f=a*b a=b b=f Printf NextI

下面程序的运行结果是PrivateSubCommand1_Click()x＝1:y＝1Fori=1To3x＝x+y:y＝y+xNexti:printx,yEndSub

在程序的空白行处填写适当的语句，完成下列功能；依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。DoWhileList2.ListCount______List2.RemoveItem0

下列()事件过程可以将打开文件对话框的标题改变为“newCaption”。

组合框有3种不同的类型，这3种类型是下拉式组合框、简单组合框、下拉式列表框，分别通过将【】属性设置为0、1、2宋实现。

以下叙述中正确的是()。

下列关于图片框控件的语句中不正确的是()。

在程序的空自行处填写适当的语句，完成F列功能：依次自动将列表榧List2巾所有列表硕目移入列表梃Listi巾。并将移人Listl中的项目从List2；f1删除。DoWhikList2ListCountList2．Removehem

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click() DimiAsInteger,nAsInteger Fori

编写一个程序把一维数组的各元素反序存放。在主过程中调用subl过程把从键盘上输入的10个元素反序存放后再输出。根据题意，请完善下列程序。PrivateSubsubl(b()AsInteger,ByValnAsInteger)DimiA

在血平板上菌落周围形成透明溶血环，称______。

A、日受体阻滞药B、利尿药C、ACEID、钙拮抗药E、α1受体阻滞药原发性高血压合并糖尿病者首选

真正的有效通气量是（）

A、及时服B、饭前服C、清晨空腹服或睡前服D、睡前1～2h服E、晚上服用治哮喘的药物宜

与原发性肝癌的发生有关的肝病是

下面四个选项中,说法不正确的一项是()。

各交通等级要求的水泥混凝土()标准值不得低于《城镇道路工程施工与质量验收规范))CJJ1—2008的规定。

Duringthetraditionalweddingceremony,the【C1】______couplepromiseeachotherlifelongdevotion.Yet,aboutoneoutoffourAm

在Excel2007中，单元格Al、A2、A3、Bl中的值分别为56、97、121、86，若在单元格Cl中输入函数“=IF(B1＞A1，¨E¨，IF(B1＞A2，¨F¨，¨G¨))”，按回车键后，则Cl单元格中的值为(48)。

下列程序段的执行结果为　　a=1　　b=2　　ForI=1To3　　　f=a*b　　　a=b　　　b=f　　　Printf　　NextI

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()　　DimiAsInteger,nAsInteger　　Fori