快速穩定排序法測試 - Excel程式區

帖子: 323
主題: 6
精華: 0
積分: 313
點名: 0
作業系統: xp
軟體版本: 2k
閱讀權限: 20
性別: 男
註冊時間: 2015-6-24
最後登錄: 2026-1-5

1^# 跳轉到 »

發表於 2017-2-12 22:20 | 顯示全部帖子

本帖最後由 jackyq 於 2017-2-12 22:23 編輯

10000x2 = 0.198秒算慢了
排序如果用得很兇
應該要用 VC 封裝1下
會是 0.198秒的 10 倍速

帖子: 323
主題: 6
精華: 0
積分: 313
點名: 0
作業系統: xp
軟體版本: 2k
閱讀權限: 20
性別: 男
註冊時間: 2015-6-24
最後登錄: 2026-1-5

2^#

發表於 2017-2-12 23:43 | 顯示全部帖子

夠用就好

每個人 CPU 等級不一樣
只能自己和自己比
計算量 720萬筆
EXCEL + VBA  不穩排 = 15.567 sec
EXCEL + VBA    穩排 = 18.398 sec
EXCEL + VC 不穩排 = 1.547 sec
EXCEL + VC       穩排 = 1.603 sec

帖子: 323
主題: 6
精華: 0
積分: 313
點名: 0
作業系統: xp
軟體版本: 2k
閱讀權限: 20
性別: 男
註冊時間: 2015-6-24
最後登錄: 2026-1-5

3^#

發表於 2017-2-14 14:40 | 顯示全部帖子

http://jackyq.pixnet.net/blog/post/103456672-2017_02_14

帖子: 323
主題: 6
精華: 0
積分: 313
點名: 0
作業系統: xp
軟體版本: 2k
閱讀權限: 20
性別: 男
註冊時間: 2015-6-24
最後登錄: 2026-1-5

4^#

發表於 2017-2-15 17:01 | 顯示全部帖子

(1) 用 value 會比較快
(2) 當初是因為在你的2維Sub測 AR2D( 1萬 , 300 ) ,看一下 Ram 最高峰可以爆到 600 MB, 才加上去
現在 Sub 已經改成1維, 遞迴所需量大概會降為 600 MB / 300 = 2 MB , 可以拿掉 ReDim Preserve 會比較快
(3) UBound(原始二維陣列, 2) 也先代入變數會比較快, 但通常無感