在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个文本框,名称分别为Text1、Text2;还有三个命令按钮,名称分别为C1、C2、C3,标题分别为“输入”、“计算”、“存盘”(如图1-158所示)。并有一个函数过程isprime(a)可以在程序

admin2019-05-14  42

问题 在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个文本框,名称分别为Text1、Text2;还有三个命令按钮,名称分别为C1、C2、C3,标题分别为“输入”、“计算”、“存盘”(如图1-158所示)。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a 是否为素数,如果是素数,则返回True,否则返回False。请编写适当的事件过程,使得在运行时,单击“输入”按钮,就把文件in5.txt 中的整数放入Text1中;单击“计算”按钮,则找出大于Text1中的整数的第一个素数,并显示在Text2中;单击“存盘”按钮,则把Text2中的计算结果存入out5.txt文件中。

    注意:考生不得修改isprime 函数过程和控件的属性,必须把计算结果通过单击“存盘”按钮存入out5.txt文件中。

选项

答案【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口,分别编写命令按钮的单击事件。 参考代码: Private Sub C1_Click() Open "in5.txt" For Input As #1 Input #1, a% Close #1 Text1.Text = a% End Sub Private Sub C2_Click() a% = Text1.Text Do a% = a% + 1 Loop Until isprime(a%) Text2.Text = a% End Sub Private Sub C3_Click() Open "out5.txt" For Output As #1 Print #1, Text2.Text Close #1 End Sub 步骤2:按要求将文件保存至考生文件夹中。

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

最新回复(0)