在考生文件夹下有一个工程文件 sjt4.vbp。 请在窗体上添加一个组合框,名称为 cb1, 并输入 3 个列表项: “3” 、 “7” 、 “11” ( 列表项的顺序不限,但必须是这 3 个数字) ; 添加一个名为 Text1 的文本框; 再添加一个标题为“计算” 、 名称为 C1 的命令按钮, 如图所示。 请编写适当的事件过程, 使得在程序运行时, 在组合框中选定一个数字后, 单击“计算” 按钮, 则计算 5000 以内能够被该数整除的所有数之和, 并放入 Text1 中。 最后, 按原文件名存盘。
提示: 由于计算结果较大, 应使用长整型变量。
注意: 考生不得修改窗体文件中已经存在的程序, 在结束程序运行之前, 必须至少进行一次计算。 并且必须用窗体右上角的关闭按钮结束程序, 否则无成绩。
步骤 1: 打开本题工程文件, 按照题目要求建立控件并设置组合框控件属性, 如图 3 所示。 程序中用到的控件及属性见表 4。


图 3
表 4
| 控件 | 文本框 | 组合框 | 命令按钮 | ||
| 属性 | Name | Name | list | Name | Caption |
| 设置值 | Text1 | cb1 | 11, 3, 7 | C1 | 计算 |
步骤 2: 打开代码编辑窗口, 在代码编辑窗口指定位置编写以下代码:
