Embedded Files
(一)同計算機實作-第一版方法完成以上介面
(一)同計算機實作-第一版方法完成以上介面
每一個命令按鈕自行命名為一個有意義的名稱(Name)
例如：btn0 = 按鍵0、btn1 = 按鍵1、btnplus = 按鍵+ 等......
(二)定義變數：
(二)定義變數：
Dim a As Single
Dim b As Single
(三)將文字方塊1和文字方塊2的內容分別存入變數a、b：
(三)將文字方塊1和文字方塊2的內容分別存入變數a、b：
Private Sub TextBox1_Change()
a = TextBox1.Value
End Sub
Private Sub TextBox2_Change()
b = TextBox2.Value
End Sub
(四)數字按鍵功能：
(四)數字按鍵功能：
以數字0為例，以下程式碼代表當按鍵0按下後，在文字方塊2中顯示數字0。
Private Sub btn0_Click()
TextBox2.Value = TextBox2.Value * 10 + 0
End Sub
(五)運算功能鍵：
(五)運算功能鍵：
以加法按鍵為例，以下程式碼代表當按鍵+按下後，將原文字方塊2中的數字移至文字方塊1中同時歸0，並於文字方塊3中顯示+。
Private Sub btnplus_Click()
TextBox1.Value = b
TextBox2.Value = 0
TextBox3.Value = "+"
End Sub
Page updated
Report abuse