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

admin2020-04-18 48

问题编写如下程序：
Private Sub Command1_Click()
Dim a(3,3)As Integer,s As Integer
For i=1 To 3
For j=1 To 3
a(i,j)=i*j+i
Next j
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://kaotiyun.com/show/BMTp777K

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

二级VB

NCRE全国计算机二级

相关试题推荐

在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码：OptionBasejPrivateSubCommand1_Click()Dimaa=Array(1，2，3，4)j=l
下列选项中不属于结构化程序设计原则的是(　　)。
在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()　　DimI，Num　　Randomize　　Do　　　　ForI＝1To1000　　　　　　Num＝Int(Rnd*
设有关键码序列(66，13，51，76，81，26，57，69，23)，要按关键码值递增的次序排序若采用快速排序法，并以第一个元素为划分的基准，那么第一趟划分后的结果为()。
窗体上有一个名称为Textl的文本框，一个名称为CDl的通用对话框，一个标题为“打开文件”的命令按钮，如图所示。命令按钮的单击事件过程如下：PrivateSubCommandl＿Click()CDI．ShowOpenOp
窗体如图1所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击"删除"按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能：PrivateSubCommand1_Click()　　Dimn%
下列数据结构中，属于非线性结构的是()。
为把圆周率的近似值3.14159存放在变量pi中，应该把变量pi定义为(　　)。
以下合法的VB变量名是()。
某二叉树有5个度为2的结点，则该二叉树中的叶子结点数是(　　)。

随机试题

SARS诊断应注意鉴别的有
男性，10岁，6周前外伤致左股骨中上段螺旋形骨折，目前大腿部仍有酸痛。X线片示：远端向上移位2cm，向内向后移位1/3，断端向前成角10°，已有骨痂形成，骨折线趋于模糊，其首选治疗方案是(　　　)女性，42岁，工作时右小腿被机器压碾伤，X线片提示胫腓骨
下列叙述不对的是
甲将一女强奸。经查甲患有间歇性精神病，在实施强奸行为时精神正常，但是在强奸后因为被调查审讯刺激精神病发作，关于甲下列哪些说法正确?
用土层锚杆应充分考虑锚杆或锚索在地下防腐问题，施工时不应采用()。
以下关于银行理财产品的说法有误的是()。
甲、乙、丙、丁四人决定投资设立一普通合伙企业，并签订了书面合伙协议。合伙协议的主要内容如下：(1)甲以货币出资10万元，乙以实物折价出资8万元，丁以货币出资4万元，丙以劳务作价出资6万元；(2)约定了分配利润和承担债务的比例；(3)
税务代理人接受纳税人、扣缴义务人的委托，不能从事下列()的业务代理。
设向量组a1，a2,…,am线性相关，且a1≠0，证明存在某个向量ak(2≤k≤m)，使ak能由a1，a2，…，ak—1线性表示。
Whatisherdbehavior?

最新回复(0)

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

二级VB

NCRE全国计算机二级

在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码：OptionBasejPrivateSubCommand1_Click()Dimaa=Array(1，2，3，4)j=l

下列选项中不属于结构化程序设计原则的是( )。

在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click() DimI，Num Randomize Do ForI＝1To1000 Num＝Int(Rnd*

设有关键码序列(66，13，51，76，81，26，57，69，23)，要按关键码值递增的次序排序若采用快速排序法，并以第一个元素为划分的基准，那么第一趟划分后的结果为()。

窗体上有一个名称为Textl的文本框，一个名称为CDl的通用对话框，一个标题为“打开文件”的命令按钮，如图所示。命令按钮的单击事件过程如下：PrivateSubCommandl＿Click()CDI．ShowOpenOp

窗体如图1所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击"删除"按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能：PrivateSubCommand1_Click() Dimn%

下列数据结构中，属于非线性结构的是()。

为把圆周率的近似值3.14159存放在变量pi中，应该把变量pi定义为( )。

以下合法的VB变量名是()。

某二叉树有5个度为2的结点，则该二叉树中的叶子结点数是( )。

SARS诊断应注意鉴别的有

下列叙述不对的是

甲将一女强奸。经查甲患有间歇性精神病，在实施强奸行为时精神正常，但是在强奸后因为被调查审讯刺激精神病发作，关于甲下列哪些说法正确?

用土层锚杆应充分考虑锚杆或锚索在地下防腐问题，施工时不应采用()。

以下关于银行理财产品的说法有误的是()。

税务代理人接受纳税人、扣缴义务人的委托，不能从事下列()的业务代理。

设向量组a1，a2,…,am线性相关，且a1≠0，证明存在某个向量ak(2≤k≤m)，使ak能由a1，a2，…，ak—1线性表示。

Whatisherdbehavior?

下列选项中不属于结构化程序设计原则的是(　　)。

在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()　　DimI，Num　　Randomize　　Do　　　　ForI＝1To1000　　　　　　Num＝Int(Rnd*

窗体如图1所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击"删除"按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能：PrivateSubCommand1_Click()　　Dimn%

为把圆周率的近似值3.14159存放在变量pi中，应该把变量pi定义为(　　)。

某二叉树有5个度为2的结点，则该二叉树中的叶子结点数是(　　)。