页面打开中,请稍候...
www.Gzu521.com
| Gzu521.com我的学习网 |
|
知识点：for语句和if语句嵌套 private sub command1_click() dim a as variant a = array(4, 2, 3, 1, 5) for m = 4 to 0 step -1 for n = 1 to m if a(m) < a(m - n) then t = a(m) a(m) = a(m - n) a(m - n) = t end if next n next m for m = 0 to 4 print a(m); next m end sub |
责任编辑：gzu521
您的位置：
