关于变量

Question

    dim num1,num2,num3,i,m as Integer
    num1=CInt(1000 * Rnd + 1)
    num2=CInt(1000 * Rnd + 1)
    num3=CInt(1000 * Rnd + 1)
    m=0
    For I = 0 To 2
      if num(I) <10 then m=m+1  '怎么用num 和i表示num1,num2,num3?   我记得在vbscript里可以表示的啊
    next

Answer 1

    dim num(1 to 3) as long,i as long,m as Integer
    num(1)=CInt(1000 * Rnd + 1)
    num(2)=CInt(1000 * Rnd + 1)
    num(3)=CInt(1000 * Rnd + 1)
    m=0
    For I = 0 To 2
      if num(I) <10 then m=m+1  '怎么用num 和i表示num1,num2,num3?  我记得在vbscript里可以表示的啊
    next