编写如下程序： Private Sub Command1_Click() Dim a(3，3)As Integer，s As Integer For i=l To 3 For j=1 To 3 a(i，j)=i*j+

admin2017-04-25 76

问题编写如下程序：
Private Sub Command1_Click()
Dim a(3，3)As Integer，s As Integer
For i=l To 3
For j=1 To 3
a(i，j)=i*j+i
Next i
Next i
s=0
For i=1 To 3
s=s+a(i，4-i)
Next i
Print s
End Sub
程序运行后，单击命令按钮Command1，输出结果为

选项 A、7
B、13
C、16
D、20

答案C

解析本题中首先用一个二重循环为二维数组的每一个元素赋值，然后累加二维数组的部分元素，即依次累加a(1，3)、a(2，2)、a(3，1)的值，相当于对角线求和。

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

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

二级VB

NCRE全国计算机二级

相关试题推荐

建立一个新的标准模块，应该选择哪个菜单下的“添加模块”命令?
能够获得一个文本框中被选取文本的内容的属性是
在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程：PrivateSubForm_Load()Fori=1To10List1.AddItemi*10Nexti
窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerX=2
在窗体上有一个文本框控件，名称为TextTime；一个计时器控件，名称为Timer1。要求每一秒在文本框中显示一次当前的时间。程序为：PrivateSubTimer1_______()TextTime.text=TimeEndSub
若要添加CommonDialog控件，则应从“工程”菜单中选定“部件”，在“部件”对话框的“控件”选项卡中选择______，将控件添加到工具箱中。
以下语句用于打开一个顺序文件Open"C:\MyFile.txt"ForOutPut，但是该语句的一个重要错误是没有
关于变量作用域，下列叙述中错误的是()。
由Array函数建立的数组的名字必须是【】类型。

随机试题

菜肴是由一定的________构成的。
Myfatherwas【C1】______astrongmanwholovedbeingactive,butaterribleillness【C2】______allthataway.Nowhecannolonge
根据《工程监理企业资质管理规定》，工程监理企业的资质等级划分是(　　)。
【背景资料】某钢厂将一条年，100万t宽厚板轧制生产线的建设项目，通过招标方式．确定该项目中的板坯加热炉车间和热轧制车间交由冶金施工总承包一级资质的企业实施总承包，负责土建施工，厂房铜结构制作、安装，车间内300t桥式起重机的安装，设备安装与调试，三电-
保险代理机构、保险代理分支机构及其业务人员的展业行为由(　　)监督。
关于个人汽车贷款业务，下列说法错误的是()。
针对财务报表报出后知悉的事实，下列应对措施中，恰当的有()。
设二次型f(x1，x2，x3)在正交变换为x=Py下的标准形为2y12+y22一y32，其中P=(e1，e2，e3)，若Q=(e1，一e3，e2)，则f(x1，x2，x3)在正交变换x=Qs下的标准型为()。
“函”就是信，不具有正式公文的法定效力。()
无效劳动合同，指当事人违反法律、行政法规的规定，订立的不具有法律效力的劳动合同。它虽是办事人双方协商订立的，但经国家规定的专门机构认为无效合同后，国家则不予确认，法律不予保护。根据以上定义，下述哪种行为是典型的无效劳动合同?()。

最新回复(0)

编写如下程序： Private Sub Command1_Click() Dim a(3，3)As Integer，s As Integer For i=l To 3 For j=1 To 3 a(i，j)=i*j+

二级VB

NCRE全国计算机二级

建立一个新的标准模块，应该选择哪个菜单下的“添加模块”命令?

能够获得一个文本框中被选取文本的内容的属性是

在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程：PrivateSubForm_Load()Fori=1To10List1.AddItemi*10Nexti

窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerX=2

在窗体上有一个文本框控件，名称为TextTime；一个计时器控件，名称为Timer1。要求每一秒在文本框中显示一次当前的时间。程序为：PrivateSubTimer1_______()TextTime.text=TimeEndSub

若要添加CommonDialog控件，则应从“工程”菜单中选定“部件”，在“部件”对话框的“控件”选项卡中选择______，将控件添加到工具箱中。

以下语句用于打开一个顺序文件Open"C:\MyFile.txt"ForOutPut，但是该语句的一个重要错误是没有

关于变量作用域，下列叙述中错误的是()。

由Array函数建立的数组的名字必须是【】类型。

菜肴是由一定的________构成的。

Myfatherwas【C1】______astrongmanwholovedbeingactive,butaterribleillness【C2】______allthataway.Nowhecannolonge

根据《工程监理企业资质管理规定》，工程监理企业的资质等级划分是( )。

保险代理机构、保险代理分支机构及其业务人员的展业行为由( )监督。

关于个人汽车贷款业务，下列说法错误的是()。

针对财务报表报出后知悉的事实，下列应对措施中，恰当的有()。

设二次型f(x1，x2，x3)在正交变换为x=Py下的标准形为2y12+y22一y32，其中P=(e1，e2，e3)，若Q=(e1，一e3，e2)，则f(x1，x2，x3)在正交变换x=Qs下的标准型为()。

“函”就是信，不具有正式公文的法定效力。()

Myfatherwas【C1】astrongmanwholovedbeingactive,butaterribleillness【C2】allthataway.Nowhecannolonge

根据《工程监理企业资质管理规定》，工程监理企业的资质等级划分是(　　)。

保险代理机构、保险代理分支机构及其业务人员的展业行为由(　　)监督。