如何用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(Text1.Text)
c = 1
For b = 1 To a
c = c * b
Next b
Text2.Text = c
End Sub

【步骤09】

点击上方工具栏中的“运行”，再点击“启动”，在运行过程中譬如输入自然数5，点击“计算”按钮得出阶乘结果120，如图所示。

【步骤10】

最后再点击“文件”，选择“保存工程”或者“生成工程1.exe(k)”，保存即可。