在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图1-201所示。有一个函数过程 isprime(a)可以在程序中直接调用,其功能是判断参数a是否为

admin2019-05-14  37

问题 在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图1-201所示。有一个函数过程 isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。

    请编写适当的事件过程,使得在运行时,单击“计算”按钮,则找出小于18000的最大的素数,并显示在Text1中;单击“存盘”按钮,则把Text1中的计算结果存入考生目录下的out5.txt文件中。
    注意:考生不得修改isprime 函数过程和控件的属性,必须把计算结果通过单击“存盘”按钮存入out5.txt文件中,否则无成绩。

选项

答案【操作步骤】 步骤1:打开本题对应工程文件sjt5.vbp。 步骤2:双击窗体Form1上的“计算”按钮,打开代码编辑窗口,在其Click事件过程中输入如下代码: 参考代码: Private Sub C1_Click() sjt4.vbp, a% = 18000 Do a% = a% - 1 Loop Until isprime(a%) Text1.Text = a% End Sub 步骤3:双击窗体Form1上的“存盘”按钮,在代码编辑窗口其Click事件过程中输入如下代码: 参考代码: Private Sub C2_Click() Open "out5.txt" For Output As #1 Print #1, Text1.Text Close #1 End Sub 步骤4:按要求将文件保存至考生文件夹中。 步骤5:按<F5>键运行程序,单击“计算”按钮,再单击“存盘”按钮保存结果。

解析
转载请注明原文地址:https://jikaoti.com/ti/3NN0FFFM
0

相关试题推荐
最新回复(0)