- 590 名前:デフォルトの名無しさん [2007/07/15(日) 20:22:28 ]
- Sub aaa()
Dim a(10) As Integer Dim i As Integer a(0) = 32 a(1) = 14 a(2) = 56 a(3) = 15 a(4) = 7 a(5) = 18 a(6) = 102 a(7) = 88 a(8) = 11 a(9) = 57 a(10) = 58 '------------------- 'この間で '------------------- For i = 0 To 10 Debug.Print a(i) Next End Sub 超初心者質問ですみません。 上のようにa(10)にランダムの数字が格納されていて これを昇順(若い順)に格納しなおしてから 表示するようなプログラムを作りたいの ですがどのようなやり方があるでしょうか。。
|

|