[填空题] 在窗体上画两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后,如果单击“初始化”命令按钮,则对数组a的各元素赋值:如果单击“求和”命令按

14 查阅

[填空题] 在窗体上画两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后,如果单击“初始化”命令按钮,则对数组a的各元素赋值:如果单击“求和”命令按钮,则求出数组 a的各元素之和,并在文本框中显示出来,如图所示。请填空。

Option Base 1

Dim a(3,2)As InteSer Pnvatc SabCommand1_Click( )

For i=1 To 3

For j=1 To 2

【13】 =i+j

Next j

Next i

End Sub

Pnvate Sub Command2_Click( )

For j=1 To 3

For i=1 To 2

s=s+ 【14】

Next i

Next j

Text1.Text= 【15】

End Sub

参考答案:

[13]a(i,j) [14] a(j,j) [15] Str(s)或s

单击Command1将一数组赋值,根据“i=1 to 3”与“j=1 to 2”可知[13]处填a(i,j) 单击Command2将计算数组元素之后,根据“j=1 to 3”与“i=1 to 2”,可知[14]处填a (j,i),表示a(3,2)是一个二维数组。每执行一次For循环,s将加一次a(i,j)。结果将由 s赋给Text1的Text属性,故[15]处填s。也可以填Str(s),表示将s转为字符串。

计算机考试