看板 [ Visual_Basic ]
討論串[VBA ] 請幫我看一下排序的code出了甚麼問題~
共 3 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
下一頁
尾頁
#1
[VBA ] 請幫我看一下排序的code出了甚麼問題~
推噓2(2推 0噓 1→)留言3則，0人參與, 最新作者shirley82025 (穎)時間16年前 (2008/06/20 15:18), 編輯資訊
1
0
0
內容預覽:
因為我才剛開始學寫VBA，所以很多東西都不是很懂. 所以這些code都是我從網路找再自己改的，. 我是想做排序 先寫一個可以產生50個一直列亂數的code. 然後用氣泡排序法做排序. 可是我要執行的時候一直跑出陣列索引超出範圍. 請大家幫我看一下下面的式子到底哪裡出了問題. Option Expli
(還有484個字)
#2
Re: [VBA ] 請幫我看一下排序的code出了甚麼問題~
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者shirley82025 (穎)時間16年前 (2008/06/21 03:03), 編輯資訊
0
0
0
內容預覽:
我後來加了大家建議的Redim a(50). 雖然偵錯時沒問題. 可是執行巨集時"亂數"跟"氣泡排序"都沒反應. 請問是為甚麼呢?. 我把後來的式子放在下面. Option Explicit. Option Base 1. Dim i As Integer. Dim a() As Integer.
(還有353個字)
#3
Re: [VBA ] 請幫我看一下排序的code出了甚麼問題~
推噓1(1推 0噓 0→)留言1則，0人參與, 最新作者fumizuki (矇面加菲獅)時間16年前 (2008/06/21 08:24), 編輯資訊
0
0
0
內容預覽:
你在sort前又redim 就把陣列內容清空了. 陣列內每一個元素都是0 sort就沒意義了. 要不重覆的亂數，最簡單的方式，. 就在取亂數的迴圈中再加一層迴圈去檢查是否重覆. 重覆就再取一個新的. 請翻一下精華區 vb的問答集中有數篇亂數的討論.... --. ▃▅▇▆▄ ▆▂▃ `逝去感情如何能
(還有22個字)
首頁
上一頁
1
下一頁
尾頁