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

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

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

    程序功能：
    (1)考生文件夹下in5．dat文件中存放着100个大于10的正整数。单击“读数据”按钮，则将in5．dat文件中的数据读入数组a中。
    (2)单击“查找质数”按钮，则查找in5．dat文件中的所有质数，并将这些质数顺次显示在Text1文本框内。
    “读数据”按钮的Click事件过程己给出，请编写函数prime，实现上述功能。
    注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须使用“查找质数”按钮完成查找质数的过程，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。
选项
答案【操作步骤】 步骤1：打开考生文件夹中的工程文件sjt5．vbp，在窗体上添加以一个文本框，并按照表4—24设置相关属性。 [*] 步骤2：在代码编辑窗口中，补充prime函数。参考代码： Function prime(P As Integer) As Boolean ’考生编写 Dim flag As Boolean flag＝True For m＝=2 To P／2 If P Mod m＝0 Then flag＝False Exit For End If Next m prime＝flag End Function 步骤3：按运行程序，单击各按钮测试验证。 步骤4：按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/bVGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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