Question

1、利用随机函数产生一个由15个[10,90]之间的奇数组成的数列,并显示在标签1中.单击命令按钮,将该数列中

Answer 1

dim a(1 to 15) as integer

for i=1 to 15

a(i)=int(Rnd*40)*2+11

label1.caption=label1.caption & a(i) & " "

next