VB怎么写随机生成10个[1,100]之间的数,并从大到小排列的程序?
问题描述:
VB怎么写随机生成10个[1,100]之间的数,并从大到小排列的程序?
答
private sub command1_click()
dim a(1 to 10) as integer,i,j
for i=1 to 10
a(i)=int(rnd*100)+1
print a(i);
next
print
for i=1 to 10
for j=1 to i
if a(i)