作者hebe52h (Aki)
站內Visual_Basic
標題[VB6 ] VB數值比大小的程式??
時間Mon Dec 15 21:08:22 2008
我用亂數產生10組亂數
每組有7個0~99不等的數
例:1 82 81 27 74 68 2 44
2 43 26 17 32 81 31 65
3 77 7 82 62 82 50 57
4
5
6
7
8
9
10
等等...就不多打了
主要是想了解
每組要怎麼比出它的大小
例如:第一組 82 81 27 74 68 2 44
可以變成 7 6 2 5 4 1 3 (這是第一組的大小排序)
請問這程式要怎麼打呢??
麻煩各位了
謝謝..
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.121.115.12
1F：→ MOONRAKER:噗 這跟直接產生1-7的亂數不是一樣嗎 12/16 08:13
2F：→ hebe52h:不是產生亂數1~7..是先產生一組亂數後比較從最小到最大 12/16 13:07
3F：→ hebe52h:最小的為1..例:2最小所以為1..82最大排在第7 12/16 13:09
4F：→ MOONRAKER:看不懂 你不是要變成 7625413 那不就是直接產生1-7亂數 12/16 14:16
5F：→ hebe52h:就像是我打的產生第一組亂數:82 81 27 74 68 2 44 12/16 14:21
6F：→ hebe52h:然後比較這7個數的優先順序,最小為1到最大7 12/16 14:23
7F：推 Y78:要排序的話 list就可以了 12/16 18:27
8F：→ MOONRAKER:排序啊 自己寫insertion sort就很簡單了 12/16 21:54
9F：→ MOONRAKER:VB6.0真的有list好用嗎？ 12/16 21:54
10F：→ hebe52h:insertion sort是什麼??我是初學 12/16 21:56
11F：→ hebe52h:可以給我的提示或是有哪個函數可以用的?? 12/16 21:57
12F：→ hebe52h:我的排序不要照順序唷!!要跟配合亂數大小來排如例子 12/16 21:59
13F：→ MOONRAKER:我越來越聽不懂了 排序就是大到小或小到大 12/16 22:17
14F：→ MOONRAKER:是要怎樣不按順序 insertion sort以下送你個網頁看 12/16 22:23
15F：→ MOONRAKER:……算了 怎麼中文的網頁都寫得那麼爛 我現教你別的好了 12/16 22:39
16F：→ MOONRAKER:Selection sort: 令陣列大小為 n ,(1)for i=1 to n 12/16 22:42
17F：→ MOONRAKER:(2)for j=i+1 to n (3)在[j, n]中找出最小值所在位置 m 12/16 22:42
18F：→ MOONRAKER:(4)交換陣列的 m 和 i 兩格(5)以此類推 12/16 22:43
19F：→ hebe52h:謝謝你的指教.. 12/16 23:10
20F：→ hebe52h:不過我的意思是如:20 54 31 51 9這五個數 12/16 23:11
21F：→ hebe52h:最小為9所以它顯示1..第二小為20顯示2以此類推 12/16 23:13
22F：→ hebe52h:只是這1~5的數字不是照順序排.. 12/16 23:14
23F：→ hebe52h:是以它跑出來的數字比過大小後分別配上它是第幾位大小 12/16 23:16