[问答题] 在窗体上建立一个名称为Text1的文本框和一个名称为Cmd1，标题为“计算”的命令按钮，如图11-17所示。程序运行后，单击“计算”命令按钮，通过在对话框输入整数12，放入整型变量a中，然

[问答题] 在窗体上建立一个名称为Text1的文本框和一个名称为Cmd1，标题为“计算”的命令按钮，如图11-17所示。程序运行后，单击“计算”命令按钮，通过在对话框输入整数12，放入整型变量a中，然后计算a!(提示：运算结果应放入Long型变量中)，在文本框中显示结果，并把结果存入文件out.txt中。在考生文件夹中有一个标准模块mode.bas，该模块中提供了保存文件的过程putdata，考生可以直接调用。

注意：保存时必须存放在考生文件夹下，窗体文件名为sit4.frm，工程文件名为sit4.vbp。

当运行程序后所弹出的对话框是由Visual Basic系统本身提供的，通过调用函数InputBox来实现，本题的主要思想是考查循环语句的应用。计算一个数值的阶乘时使用了for循环，最后调用了所给模块中的过程将结果进行保存。解题步骤如下。 (1)建立界面并设置控件属性。本题用到了1个文本框和1个命令按钮，将命令按钮的Caption属性设置为“计算”，Name属性设置成Cmd1，文本框属性为默认设置。 (2)编写程序代码。 在编写程序代码时要注意变量范围的设定，题目要求将计算结果存入Long变量中，所以把

在窗体上建立好控件后，先设置控件属性，再编写事件过程。