dim a(0 to 9) as Integer
dim imax as integer,i as integer
For i = 0 To 9
a(i) = (Int(Rnd() * 100) + 100)
Next i
imax = 0
For i = 1 To 9
If a(imax) < a(i) Then imax = i
Next i
a(imax)
dim imax as integer,i as integer
For i = 0 To 9
a(i) = (Int(Rnd() * 100) + 100)
Next i
imax = 0
For i = 1 To 9
If a(imax) < a(i) Then imax = i
Next i
a(imax)
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货