Question

问二道VB的填空题

在窗体上添加两个名称分别为command1和command2，标题为“初始化”和“求和”的命令按扭。程序运行后，如果单机“初始化”命令按扭，则对树组a的各元素副直；如果单机“求和“，则求出树组a的各元素只和，并在文本矿中显示出来，请填空补充。
第一个
option base 1
dim a (3,2) as integer
private sub command1_click()
for i = 1 to 3
for j = 1to 2
_______=i+j
next j
next i
end sub

第二个
private sub command2_click()
for j=1to3
for i=1to2
s=s+____________
next i
next j
text1.text=___________
end sub

Answer 1

第一个
option base 1
dim a (3,2) as integer
private sub command1_click()
for i = 1 to 3
for j = 1to 2
a(i,j)=i+j
next j
next i
end sub

第二个
private sub command2_click()
for j=1 to 3
for i=1 to 2
s=s+a(i,j)
next i
next j
text1.text=s
end sub