在考生文件夹下有工程文件djks044.vbp及窗体文件djks044.frm，该程序是不完整的，请在有的地方填入正确内容，然后删除及所有注释符(’)，但不能修改其他部分。存盘时不得改变文件名和文件夹。
本题描述如下：在Form1窗体上建立一个名称为Op1的单选按钮数组，含有三个单选按钮，其标题分别为“10!”、“11!”、“12!”，Index属性分别为0、1、2；再画两个命令按钮，按钮的名称分别为Cmd1与Cmd2，标题分别为“计算”与“保存”；画一个名称为Tex1的文本框。程序的功能是在选定一个单选框并单击“计算”按钮后，可以计算出相应的阶乘值，在Text1中显示该值。单击“保存”，文本框中的数据可以保存到考生文件夹下的out044.txt文件夹中。注意窗体加载时，Cmd2按钮不可用，单击“计算”按钮后，Cmd2变为可用。
程序运行时的窗体界面如下图所示。
试题源程序
1 Private Sub Cmd1_Click( )
2 Cmd2.Enabled=True
3 Dim i As Integer
4 Dim t As Integer
5 For i=0 To 2
6 If Opl(i)=True Then
i. t=Val(Left$(Op1(i).Caption，))
ii. Text1.Text=(t)
7 End If
8 Next i
9 End Sub
10 Function Out(n As Integer)
11 Dim i As Integer
12 Dim t As Long
13 t=1
14 For i=2 To n
15 Print
16 Next i
17 Out=t
18 End Funtion
19 Private Sub Cmd2_Click( )
20 Open App.Path &"\out044.txt" For Output As #1
21 Print#1，Text1.Text
22 Close #1
23 End Sub
24 Private Sub Form Load( )
25 Cmd2.Enabled=
26 End Sub
参考答案：
1．单击考试界面的“功能”选项，从弹出的菜单中选择“启动应用程序”选项。Visual Basic启动后，打开考生文件下的工程文件。
2．分别单击工具箱的按钮控件及文本框控件，在窗体上画出一个文本框和一个控制按钮。文本框的Name属性为Text1；控制按钮的Name属性为Cmd1，Caption属性为“计算”。双击工具箱中的单选按钮，在窗体上复制该按钮，然后粘贴，在弹出的对话框中选择“是”，建立一个包含三个单选按钮的控件数组，Caption属性分别为“10!”、“11!”、“12!”。
3．双击窗体的任何部分，进入程序编写窗口，补充程序如下：
第一个处填2
第二个处填Out
第三个处填t=t*i
第四个处填False
4．填写完毕，删除“”符号，调试程序，确定无误后，将工程与窗体按照原来的文件名保存在考生文件夹下。
解析：
本题程序代码中包含一个函数过程Out，该过程用来计算以n为参数的阶乘。第三个处填t=t*i，表示阶乘，阶乘值赋给t。第二个处填Out，表示对函数过程的引用。第一个处填2。Left$(Opl(i)．Caption，2)表示返回字符串Opl(i)．Caption从左开始的2个字符，即需要传给Out过程的实参。
根据题意，窗体加载时，Cmd2按钮不可用，表示禁用，故在第四个处填False。