问答题 简单应用题 (1)在考生文件夹中有工程文件sj3.vbp及其窗体文件sj3.frm,该程序是不完整的。在窗体上有一个名称为Command1、标题为“求和”的命令按钮,三个名称分别为Text1、Text2和Text3的文本框,运行界面如图5-4所示。要求程序运行后,在Text1和Text2中分别输入两个整数,单击“求和”按钮后,可把两个整数之间的所有奇数(不含输入的两个整数)累加起来并在Text3中显示。 注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符“'”,但不能修改其他部分。存盘时不得改变文件名和文件夹。 (2)在考生文件夹中有工程文件sj4.vbp及其窗体文件sj4.frm,该程序是不完整的。在窗体上建立一个名称为Text1的文本框,建立一个名称为Command1、标题为“计算”的命令按钮,如图5-5所示。要求程序运行后,如果单击“计算”按钮,则求出50~200所有可以被5整除的数的总和,在文本框中显示出来,并把结果存入考生文件夹下的out.txt文件中。(在考生的文件夹下有一个mode.bas标准模块,该模块中提供了保存文件的过程Writedata,考生可以直接调用。)
【正确答案】(1)看一个数是否为奇数,只要判断此数是否能被2整除,若不能整除,则是奇数,否则不是奇数。如:N Mod 2=0,则说明余数为0,N能被2整除,否则N不能被2整除。 根据题意将一个命令按钮和三个文本框控件添加到窗体中,命令按钮的名称属性为Command1、Caption属性为“求和”,三个文本框的名称分别为Text1、Text2和Text3,然后双击Command1进入代码窗口,补充后的具体代码如下: (2)根据题意,将一个命令按钮和一个文本框控件添加到窗体中,命令按钮的名称Command1、Caption属性为“计算”,文本框的名称为Text1,本题是为了求50~200的能被5整除的数的和,显示到文本框中并保存到out.txt中。在“工程”窗口中单击右键,在弹出的快捷菜单中选择“添加”→“添加模块”,然后在弹出对话框的“现存”选项卡中选择“mode.bas”,单击“确定”按钮即添加成功。模块mode.bas中的代码如下:
【答案解析】