vb6初學者：[1]做一個加法計算器?

vb6是一個古老的程式設計工具。因為它的方便和易於理解，所以中學裡一直有vb程式設計教學。本文將教初學者製作一個簡單的加法計算器。

方法/步驟

首先，開啟vb6.0中文版，選擇 新建標準exe,點開啟。

開啟程式視窗，如下圖所示：

繪製控制元件

從左側選單欄（控制元件工具箱）選取並繪出兩個標籤（label）、兩個文字框(text)、一個按鈕(command)。

修改控制元件顯示

（1）在label1標籤上點選右鍵，選屬性，開啟屬性窗體。將caption屬性改為“第一個數”

（2）用同樣的方式把label2的caption屬性改為“第二個數”

同樣的方式開啟文字框text1和text2的屬性視窗，將text屬性中的內容刪掉

開啟command1的屬性視窗，將caption屬性改為“計算結果”

雙擊按鈕（我們以後將稱其command1），開啟程式輸入視窗：

Private Sub Command1_Click() '表示command1按鈕點選的時候發生如下事件

End Sub '表示command1按鈕單擊事件執行到該處停止

我們需要在兩句中間輸入需要計算機執行的程式設計程式碼。如

Private Sub Command1_Click()

Dim jieguo As Integer '定義一個叫做jieguo的變數，用以儲存結果

jieguo = Val(Text1.Text) + Val(Text2.Text)

'val(text1.text)即將text1文字框中的內容轉成數字，用加號將兩個文字框中的內容相加並複製到jieguo裡。

MsgBox (jieguo) '將jieguo中的內容，用提示框的形式表示出來。

End Sub

測試程式

提示：選單欄裡的除錯按鈕，提供兩種除錯模式，在糾錯時比較適用

點選選單欄的啟動按鈕，輸入數字，檢測程式執行情況

生成執行檔案

點選選單欄“檔案”-----“生成工程1.exe”，可生成執行檔案。