1樓：匿名使用者
private sub form_click()
dim i as long, j as long
dim temp as string, ar(1 to 10, 1 to 2) as string
clsar(1, 1) = "207號": ar(1, 2) = "14.5秒"
ar(2, 1) = "231號": ar(2, 2) = "14.7秒"
ar(3, 1) = "096號": ar(3, 2) = "15.7秒"
ar(4, 1) = "302號": ar(4, 2) = "14.5秒"
ar(5, 1) = "077號": ar(5, 2) = "15.1秒"
ar(6, 1) = "453號": ar(6, 2) = "15.2秒"
ar(7, 1) = "122號": ar(7, 2) = "13.7秒"
ar(8, 1) = "156號": ar(8, 2) = "14.2秒"
ar(9, 1) = "276號": ar(9, 2) = "13.9秒"
ar(10, 1) = "339號": ar(10, 2) = "14.9秒"
for i = 1 to 9
for j = i + 1 to 10
if val(ar(i, 2)) > val(ar(j, 2)) then
temp = ar(i, 2)
ar(i, 2) = ar(j, 2)
ar(j, 2) = temp
temp = ar(i, 1)
ar(i, 1) = ar(j, 1)
ar(j, 1) = temp
end if
next
next
for i = 1 to 10
print ar(i, 1) & " ";
print ar(i, 2)
next
end sub
稅務問題！求稅務高手指教
現在對於一般納稅人的認定，如果銷售型企業在連續12個月內達到80萬，就要自行申請一般納稅人，也就是說自已要注意，什麼時候到了就什麼時候申請，可不能等到整滿一看再總結是否達標，不主動申請的話，稅局會強制認定，那進項就不能抵了，而且也不能開專票，還必須得按17 上稅。稅局這麼處理，是不是你第一個月申報的...
不會搭配求高手指教 10
不會搭配求高手指教 休閒鞋與休閒褲的搭配。休閒皮鞋配什麼褲子，當然最普遍的搭配就是和休閒褲搭配，但是不能太撞色，顏色上要協調。土黃的褲子與深灰色的鞋子就很很完美的搭配。此款時尚反絨牛皮繫帶休閒鞋，採用輕盈 耐磨的橡膠發泡大底與優質反絨牛皮的組合，不僅款式時尚新穎而且穿著舒適。全豬皮成型墊，將耐磨 舒...
電腦藍屏請高手指教謝謝，請電腦高手指教電腦藍屏的問題
大多數情況是記憶體條，一個是有灰，或者沒插穩，或者不相容。還有個情況就是病毒。但這種情況多數是記憶體條的問題 請電腦高手指教電腦藍屏的問題.20 系統藍屏主要的就是硬碟和記憶體的問題，你可以試著換格別的牌子的記憶體試一下，這樣沒準可以解決呢？懷疑是那個雜牌記憶體的問題，第2塊主機板也受影響了，連主機...