如何用VB編寫一個自然數階乘的程序

用vb編寫自然數階乘程序，在程序中輸入任何一個自然數便可輕鬆得出其相應的階乘答案。

操作方法

（01）首先啓動VB程序，在“新建工程”介面選擇【標準 EXE】，點擊【開啟】按鈕，進入工程頁面後再將最右端下方屬性視窗中Form1的“Caption”的內容改爲“自然數的階乘”，如圖所示

（02）單擊最左端工具欄中的【TextBox】,在窗體上拖動變成十字線的鼠標指針畫出合適的文字方塊大小，或者是雙擊【TextBox】，會在窗體中自動出現文字方塊，自己拖動文字方塊調節大小和位置即可，重複操作建立兩個文字方塊，如圖所示。

（03）單擊最左端工具欄中的【Label】,在窗體上拖動變成十字線的鼠標指針畫出合適的標籤大小，或者是雙擊【Label】，會在窗體中自動出現標籤，自己拖動標籤調節大小和位置即可，重複操作建立兩個標籤，如圖所示。

（04）單擊最左端工具欄中的【CommandButton】,在窗體上拖動變成十字線的鼠標指針畫出合適的控制按鈕大小，或者是雙擊【CommandButton】，會在窗體中自動出現控制按鈕，自己拖動控制按鈕調節大小和位置即可。

（05）單擊“Text1”，在最右端下方的屬性視窗中將“Text"的內容“Text1”刪除並置空，還可單擊“Font”的內容“宋體”後面的“...”按鈕，調節文字方塊中內容的字型、字形和大小，重複操作Text2文字方塊。

（06）單擊“Label1”，在最右端下方的屬性視窗中將“Caption"的內容“Label1”改爲“請輸入自然數N”，還可單擊“Font”的內容“宋體”後面的“...”按鈕，調節標籤中內容的字型、字形和大小；Label2標籤“Caption”的內容“Label2”改爲“階乘結果爲”，其餘操作相同。

（07）單擊“Command1”,在最右端下方的屬性視窗中將“Caption"的內容“Command1”改爲“計算”，還可單擊“Font”的內容“宋體”後面的“...”按鈕，調節控制按鈕中內容的字型、字形和大小，如圖所示。

（08）雙擊“計算”按鈕，進入編輯程序：Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Double a = Val() c = 1 For b = 1 To a c = c * b Next b = cEnd Sub

（09）點擊上方工具欄中的“執行”，再點擊“啓動”，在執行過程中譬如輸入自然數5，點擊“計算”按鈕得出階乘結果120，如圖所示。

（10）最後再點擊“檔案”，選擇“儲存工程”或者“生成工程(k)”，儲存即可。