1樓:
private sub command1_click()dim a,b
a=text1.text
b=text2.text
text3.text = val(a) / val(b)end sub
private sub text2_change()if val(text2.text) = 0 thenmsgbox "除數不能為0!"
text2.text = ""
end if
end sub
下面一段要刪除
private sub text3_change()if text3.text <> "" thenmsgbox "這裡輸出運算結果,不需要輸入"
text3.text = ""
end if
end sub
2樓:melody丶丨
說是**溢位了 其實是型別不對 text的顯示應該是字元 你要轉化成字元
private sub command1_click()dim a as variant
dim b as variant
a = val(text1.text)
b = val(text2.text)
text3.text = str(a / b)end sub
3樓:匿名使用者
text3.text = val(a) / val(b)
改為if val(b)<>0 then text3.text = val(a) / val(b)
vb問題 簡單計算器 求助 求助
vb1和vb6的作用是什麼VB1和VB6的作用是什麼
維生素b1又稱硫胺素或抗神經炎維生素或抗腳氣病維生素,生理功能是能增進食慾,維持神經正常活動等,缺少它會得腳氣病 神經性皮炎等。每天需攝入2mg。主要作用包括 促進成長 幫助消化 改善精神狀況 減輕暈機暈船 緩解術後痛苦 輔助帶狀皰疹 等。維生素b6又稱吡哆素,會被人體轉化為與蛋白質的代謝關係很密切...
VB6如何讓程式只執行程式例項VB6如何讓程式只執行一個程式例項
最簡來單的 在load事件寫 宣告private declare function findwindow lib user32 alias findwindowa byval lpclassname as string,byval lpwindowname as string as long pri...
現在大多數書都是寫vb6,,而vb6設計出來的程式按鈕又不是xp風格
一樓說的不對,介面風格與作業系統沒有關係。不信你用vb6.0放一個按鈕,在xp系統裡執行試試就知道。要做出漂亮介面,必須要呼叫大量的windows api函式,還要用vc的資原始檔。而vb2008的控制元件是把這些資源進行了打包,所以無需額外的api。建立一個副檔名是manifest的檔案,該檔案是...