随机产生10个0-100的正整数放入A数组中，用冒泡法由大到小排序。VB编程！！
4个回答
展开全部
看看能不能打开
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
VB不会
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
private sub command1_click()
dim a(10),i,j,t
for i=1 to 10
a(i)=int(rnd*101)
print a(i);
next
print
for i=1 to 10
for j=1 to i
if a(i)>a(j) then t=a(i):a(i)=a(j:a(j)=t
next
next
for i=1 to 10
print a(i);
next
dim a(10),i,j,t
for i=1 to 10
a(i)=int(rnd*101)
print a(i);
next
for i=1 to 10
for j=1 to i
if a(i)>a(j) then t=a(i):a(i)=a(j:a(j)=t
next
next
for i=1 to 10
print a(i);
next
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
10个整数是输入的么？
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（2）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
