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

admin2013-10-18  14

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

选项

答案步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口,分别编写命令按钮的单击事件。 参考代码: Private Sub Cl_Click( ) Open”in5.txt”For Input As#1 Input #1,a% Close #1 Textl.Text=a% End Sub Private Sub C2 Click( ) a%=Textl.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

解析
转载请注明原文地址:https://kaotiyun.com/show/EHQp777K
0

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