如何用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)”，保存即可。