1樓：匿名使用者
氣泡排序,3個數排2次就夠了
a=text1.text
b=text2.text
c=text3.text
if a>b then
k=aa=b
b=kend if
text4.text=a
text5.text=b
text6.text=c
if b>c then
k=bb=c
c=kend if
if a>b then
k=aa=b
b=kend if
if b>c then
k=bb=c
c=kend if
2樓：vb糖果
private sub command1_click()dim t as integer
a = text1.text
b = text2.text
c = text3.text
if a > b then t = a: a = b: b = tif a > c then t = a:
a = c: c = tif b > c then t = b: b = c:
c = ttext4.text = a
text5.text = b
text6.text = c
end sub
VB程式設計題（簡單），VB 程式設計題（簡單）
做個標記，等會發你郵箱 private sub form load timer1.interval 1000timer1.enabled trueend sub private sub timer1 timer if option1.value true then text1.text format...
vb程式設計，VB程式設計
大哥你這個問題很簡單，只不過在這裡不能把 全給你，你的問題描述的不清楚，我吧幾個關鍵的技術點告訴你 字型變化有font屬性來實現 按鈕始終在窗體又下放可以再窗體的form resize中設定 按鈕的top和left屬性讓他們分別 me.whith 50,me.heght 50 4 4個按鈕每單擊一次...
VB程式設計問題，VB程式設計問題
dim a,b 定義兩個變體型變數a，b，在該模組範圍內有效 private sub form load 窗體載入事件觸發的函式 a picture1.width 記錄 框控制元件picture1的寬度到a變數 b picture1.height 記錄 框控制元件picture1的高度到b變數 hs...