2. 计算机
  3. 在考生文件夹下有一个工程文件sjt5．vbp，窗体上有2个标题分别是“读数据”和“查找质数”的命令按钮。请画1个名称为Text1、初始值为空的文本框，该文本框允许显示多行内容，且有垂直滚动条，如图3—36所示。 程序功能： (1)考生文件夹下in5．dat

在考生文件夹下有一个工程文件sjt5．vbp，窗体上有2个标题分别是“读数据”和“查找质数”的命令按钮。请画1个名称为Text1、初始值为空的文本框，该文本框允许显示多行内容，且有垂直滚动条，如图3—36所示。 程序功能： (1)考生文件夹下in5．dat

admin2017-03-27  29
问题 在考生文件夹下有一个工程文件sjt5．vbp，窗体上有2个标题分别是“读数据”和“查找质数”的命令按钮。请画1个名称为Text1、初始值为空的文本框，该文本框允许显示多行内容，且有垂直滚动条，如图3—36所示。
程序功能：
(1)考生文件夹下in5．dat文件中存放着100个大于10的正整数。单击“读数据”按钮，则将in5．dat文件中的数据读入数组a中。
(2)单击“查找质数”按钮，则查找in5．dat文件中的所有质数，并将这些质数顺次显示在Textl文本框内。
“读数据”按钮的Click事件过程已给出，请编写函数prime，实现上述功能。
注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须使用“查找质数”按钮完成查找质数的过程，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。
选项
答案步骤1：打开考生文件夹中的工程文件sjt5．vbp，在窗体上添加以一个文本框，并按照表4—24设置相关属性。 [*] 步骤2：在代码编辑窗口中，补充prime函数。 参考代码：Function prime(p As Integer) As Boolean ’考生编写 Dim flag As Boolean flag=True For m=2To p／2 If p Mod m=0Then flag=False Exit For End If Next m prime=flag End Furlctjon 步骤3：按＜F5＞运行程序，单击各按钮测试验证。 步骤4：按要求将文件保存至考生文件夹中。
解析 题目要求设计判断某个数n是否素数的函数prime，方法是：看在2～n／2范围内能否找到一个整数m将n整除，若m存在，则n不是素数：若找不到m，则n为素数。
转载请注明原文地址:https://kaotiyun.com/show/yhGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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