1樓:匿名使用者
假設20個資料在excel工作表的a列,在a1:a20。
下面vba**就可以實現
sub px()
for i = 1 to 20
for j = i to 20
if cells(i, 1) < cells(j, 1) thens = cells(i, 1): cells(i, 1) = cells(j, 1): cells(j, 1) = s
end if
next
next
end sub
2樓:匿名使用者
vb程式**
dim a(20) as integer
dim i as integer, j as integer, k as integer
for i = 1 to 20
a(i) = int(rnd * 90) + 10next i
for i = 1 to 19
for j = 1 to 20 - i
if a(j) > a(j + 1) thenk = a(j)
a(j) = a(j + 1)
a(j + 1) = k
end if
next j
next i
for i = 1 to 20pri
用氣泡排序法對陣列排序,用氣泡排序法對乙個陣列排序
include define n 15 int main i,j,t 陣列已有n個資料for i 0 ia j 1 若相信的元素大小順序不對,就交換 for i 0 i printf n return 0 main printf the sorted numbers n for i 0 i 10 i...
隨機數表法怎麼用
1 統一編號。即將總體中的所有研究物件進行統一編號,做成籤。如果研究物件是10以內的,只取1位數,則編號是 1 9 如果研究物件在 1 99 之間的,取 2 位數,則編號是 01 99。如果研究物件在 1 999 之間的,取 3 位數,則編號是 001 999 其他依次類推。然後充分混合,目的是使各...
色譜乙腈對人體有哪些危害,反相色譜法用的乙腈與甲醇的區別
無論是色譜級的乙腈還是化學純的乙腈,對人體都是有危害的啊,一般色譜級的是用來做流動相的啊,容易揮發,然後就會吸進去啊,用的時候做好防護措施就好了,注意室內通風什麼的,我用了兩年多,暫時沒發現什麼後遺症 我是化學的,主要是眼睛和呼吸道 各位,虛心求教色譜乙腈和色譜純甲醇對未婚男性有什麼危害?急!具體點...
用數學歸納法證明 對任意的正整數n,有 3n 1 7 n能被9整除
從第二步開始 設n k時,3k 1 7 k 1能被9整除,則當n k 1時,3 k 1 1 7 k 1 1 3k 4 7 k 1 1 3k 1 7 k 1 3 7 k 1 1 7 3k 1 7 k 21 7 k 1 3k 1 7 k 1 6 3k 1 7 k 21 7 k 3k 1 7 k 1 18...