vb作業 a,b,c數,輸出三者的中間數

時間 2022-03-06 02:30:11

1樓:匿名使用者

實際上可以使用氣泡排序法,這樣不止3個數,n個樹都可以**如下:

dim x(3) as integer

dim i%,j%

x(1)= '第乙個數

x(2)= '第二個數

x(3)= '第三個數

for i = 1 to 3

for j = 1 to 3

if x(i)

dim t%

t=x(i)

x(i)=x(j)

x(j)=t

end if

next

next

msgbox "中間數為:" & x(2)

2樓:匿名使用者

新建3個text1控制項,和乙個command控制項,在text1、text2、text3中輸入引數

private sub command1_click()a = val(text1.text)

b = val(text2.text)

c = val(text3.text)

if (a < b) and (a > c) thenmsgbox a

elseif (b < a) and (b > c) thenmsgbox b

elseif (c < a) and (c > b) thenmsgbox c

elseif (a > b) and (a < c) thenmsgbox a

elseif (b > a) and (b < c) thenmsgbox b

elseif (c > a) and (c < b) thenmsgbox c

end if

end sub

3樓:安徽丁麗

說具體點 中間數指什麼?

vb程式設計題,輸入3個數,然後輸出其中的最大數

4樓:匿名使用者

private sub command1_click()if val(text1)>val(text2) then max=val(text1)

if val(text3)>max then max=val(text3)

text4=max

end sub

按下按鈕,比較3個文字框中數字大小版輸出權到文字框4

vb程式設計,輸入a,b,c,三個數,按從小到大顯示

vb 程式設計 編寫程式計算:輸入三個數a,b,c按從小到大輸出

從鍵盤輸入任意三個數a,b,c,找出其中的最大數用vb做

輸出a b c三者中最大的數,這樣錯在哪裡

你的輸入有問題,scanf d d d n a,b,c 比如輸入632541,你的意思是想要63,25,41進行比較,但是編譯器並不知道把這632541進行這樣的賦給a,b,c,所以改成scanf d d d n a,b,c 或者改為這樣,乙個個輸入 scanf d n a scanf d n b ...

vb中vbp frm exe三者有什麼關係

vbp是工程檔案,記錄相關資料及關係 frm只是單一的窗體檔案 乙個程式不一定只有乙個窗體 vb中vbp frm exe 三者有什麼關係 鈔雲霞折儂 vbp是工程檔案,記錄相關資料及關係 frm只是單一的窗體檔案 乙個程式不一定只有乙個窗體 盧初南滿閎 vb做的exe即使是反編譯也根本不可能被轉換為...

商榷 商量 協商三者的區別,商量 協商 談判 三者的區別?

三個詞都有討論希望徵求大家的意見的意思 商榷是書面語,應用場合比較正式,而且參與商榷的人往往具有權威性,商量比較口語化,使用的場合比較隨意,而且往往商量的事情和參與商量的人物都比較小,協商這個詞就介於兩者之間,可以說一般情況下都可以用協商這個詞來代替商量或商榷 商榷比較正式 老師說的 商量 協商 談...