帮我拉一个平面设计电脑配置推荐清单

vb随机产生范围从1到100的10个整数放在数组a(1to10)中,用冒泡法将数组中的元素按由小到大顺序输出-中国学网-中国IT综合门户网站-提供健康,养生,留学,移民,创业,汽车等信息
> 信息中心 >
vb随机产生范围从1到100的10个整数放在数组a(1to10)中,用冒泡法将数组中的元素按由小到大顺序输出
来源:互联网 发表时间: 2:33:52 责任编辑:李志喜字体:
为了帮助网友解决“vb随机产生范围从1到100的10个整数放在数组a(1to10)中,用冒泡法将数组中的元素按由小到大顺序输出”相关的问题,中国学网通过互联网对“vb随机产生范围从1到100的10个整数放在数组a(1to10)中,用冒泡法将数组中的元素按由小到大顺序输出”相关的解决方案进行了整理,用户详细问题包括:RT,我想知道:vb随机产生范围从1到100的10个整数放在数组a(1to10)中,用冒泡法将数组中的元素按由小到大顺序输出,具体解决方案如下:解决方案1:
Private Sub Command2_Click()Randomize TimerDim a(1 To 10) As Integer, i As Integer缉阀光合叱骨癸摊含揩, j As Integer, tmp As IntegerFor i = 1 To 10 a(i) = Int(1 + Rnd * 100)NextFor i = 1 To 10 For j = i To 10 If a(i) & a(j) Then tmp = a(i) a(i) = a(j) a(j) = tmp End If NextNextFor i = 1 To 10 Print a(i);Next
解决方案2:
Private&Sub&Form_Click()Form1.ClsDim&i&As&Integer,&j&As&Integer,&temp&As&IntegerDim&a(1&To&10)&As&IntegerFor&i&=&1&To&nbs缉阀光合叱骨癸摊含揩p;10a(i)&=&Int(Rnd&*&100&+&1)Next&iFor&i&=&1&To&9For&j&=&i&+&1&To&10If&a(i)&&&a(j)&Then&temp&=&a(i):&a(i)&=&a(j):&a(j)&=&tempNext&jNext&iFor&i&=&1&To&10Print&a(i);Next&iEnd&Sub中国学网
相关文章:
最新添加资讯
24小时热门资讯
Copyright © 2004- All Rights Reserved. 中国学网 版权所有
京ICP备号-1 京公网安备02号

我要回帖

更多关于 平面设计电脑配置推荐 的文章

 

随机推荐