Vb计算机真题
私有子命令1_Click()
将()作为整数变暗
n = Val(InputBox("N= "))
雷迪姆
打印“之前:”
对于i = 1到n
a(I)= Int(101 * Rnd)-50
打印a(一);
如果我Mod 10 = 0,则打印
接下来我
i = 1: j = n
而我& ltj
t = a(i): a(i) = a(j): a(j) = t
i = i + 1: j = j - 1
行
打印“之后:”
对于i = 1到n
打印a(一);
如果我Mod 10 = 0,则打印
接下来我
末端接头