又完成一个,内心是开心的
private sub command1_click()
dim i as integer
dim a(10) as integer
randomize
for i=1 to 10
a(i)= int(rnd*1000)+1
sum =sum+a(i)
next i
print sum
end sub
又完成一个,内心是开心的
private sub command1_click()
dim i as integer
dim a(10) as integer
randomize
for i=1 to 10
a(i)= int(rnd*1000)+1
sum =sum+a(i)
next i
print sum
end sub