2013年计算机等级考试二级VB考试笔试题10
|
综合应用（1小题，计30分） 注意：下面出现的“考生文件夹”均为%USER% 在考生文件夹下有一个工程文件sjt5.vbp，相应的窗体文件是sjt5.frm（如图所示）。该程序的功能是： 单击“读数”按钮，读入考生文件夹下in5.txt文件中的一个整数，并放入Text1中； 单击“计算”按钮，则计算 小于该数的最大素数，并显示在Text2中；单击“存盘”按钮，则把该素数保存到考生文件夹下的out5.txt文件中。 要求： 1）程序已给出“存盘”按钮的事件过程代码。“读数”按钮的事件过程 和判断x是否是素数的函数prime（x）不完整，请去掉注释，并在？ 处填上正确的内容，使程序完整。 2）编写“计算”按钮的事件过程。计算小于Text1中数据的最大素数。 3）请不要改动窗体上所有控件属性设置及相应的过程代码。最后将改动后的程序用原文件名保存。 解题思路： 启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt5.vbp，相应的窗体文件名为sjt5.frm。 由于所提供的窗体程序不完整，需添加事件过程。 执行“计算”命令（即运行Click事件过程），在该Click事件过程中加入语句： Private Sub Command2_Click() n = Val(Text1.Text) For i = n To 2 Step -1 l = prime(i) If l = True Then Exit For End If Next Text2.Text = i End Sub 在“读数”按钮的Private Sub Command1_Click()中，有一处地方需要修改。 1) 将语句 ’Input #1, ? 改为 Input #1, a% 在函数Function prime(x) As Boolean中，有一处地方需要修改。 1) 将语句 ’prime = ? 改为 prime = flag 相关资料 |
