非常簡單的小程式XD.....反正我只是個入門者Q_Q......程度只有這樣= =...(畫圈圈中..
)
攝氏轉換華氏的公式是 : 攝氏溫度 * 9 / 5 + 32 = 華氏溫度
反過來說,華氏轉攝氏的公式則是 : (華氏溫度 - 32) * 5 / 9 = 攝氏溫度
先在表單裡設置兩個TextBox(文字方塊)、兩個Label(標籤)、一個CommandButton(命令鈕)
點兩下CommandButton並鍵入以下的程式碼
========================我叫分隔線XD==============================
Private Sub Command1_click()
'當你點了CommandButton1時
Text2.text = Text1.text * 9 / 5 + 32
'計算攝氏成華氏。
End Sub
'Form Load事件裡的物件屬性可以去屬性視窗設定,這樣就不用輸入以下那麼多程式碼
Private Sub Form_load()
'當表單載入時
Text1.text = "": Text2.text = ""
'TextBox1、TextBox2內容為空白
Text2.locked = True
'以防TextBox2被輸入任何數字。locked就是決定控制項所用的資料庫是否為唯讀
Label1.caption = "攝氏溫度:": Label2.caption = "華氏溫度:"
'Label1、Label2標題
Form1.caption = "攝氏溫度轉換華氏溫度的程式"
'表單標題
Command1.caption = "按我轉換XD"
'Command1標題
End Sub
========================我叫分隔線XD==============================
程式碼是我直接打的,沒有測試過= =" (應該是不會出錯的
)
看,這樣就完成一個簡單的單位轉換程式,各位有沒有開始對VB有興趣XD?
大家一起來學VB吧
[
本帖最後由 鹹淡超人 於 2008-7-22 10:56 編輯 ]