帮帮忙啊!是VBS的编程问题
用VBS定义一个5*5的数组,随机产生数组的值,计算对角线上的数据的和,并在文本框中显示出来
参考答案:option base 1
dim a(5,5) as intring
for i=1 to 5
for j=1 to 5
a(i,j)=rnd*10 '产生0-10的数
next j
next i
n=a(1,1)+a(22)+a33+a44+a55
if i+j=6 then
m=m+a(i,j)
用VBS定义一个5*5的数组,随机产生数组的值,计算对角线上的数据的和,并在文本框中显示出来
参考答案:option base 1
dim a(5,5) as intring
for i=1 to 5
for j=1 to 5
a(i,j)=rnd*10 '产生0-10的数
next j
next i
n=a(1,1)+a(22)+a33+a44+a55
if i+j=6 then
m=m+a(i,j)