VB程序題:編一模擬袖珍計算器的完整程序用vb編寫計算器的程序,界面如下圖所示。要求:輸入兩個操作數和一個操作符,根據操作符決定所做的運算。 VB源碼 龔沛曾
提示:
1.為了程序運行正確用vb編寫計算器的程序,對存入操作符的文本框Text3,應該使用Trim(Text)函數,去除運算符兩邊的空格。
2.對于存放操作符的文本符 Text3 ,利用 Case 語句實現相應的運算。
解題:
先在窗體上畫1個標簽,屬性設置為:"輸入數1 輸入數2 輸入操作符 計算結果"
再畫4個文本框,2個按鈕。
代碼如下:
Sub ()
Case Trim(Text3)
Case "+"
Text4 = Val(Text1) + Val(Text2)
Case "-"
Text4 = Val(Text1) - Val(Text2)
Case "*"
Text4 = Val(Text1) * Val(Text2)
Case "/"
If Val(Text2) = 0 Then
"分母為零,請重新輸入"
Text2 = ""
Text2.
Else
Text4 = Val(Text1) / Val(Text2)
End If
End
End Sub
Sub ()
Me
End Sub
運行程序效果圖如下:
Basic程序設計教程(第3版) (龔沛曾等編)課后實驗源碼