首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有2个标题分别是“读数据”和“查找质数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图3-36所示。 程序功能: (1)考生文件夹
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有2个标题分别是“读数据”和“查找质数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图3-36所示。 程序功能: (1)考生文件夹
admin
2020-02-27
39
问题
在考生文件夹下有一个工程文件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:按要求将文件保存至考生文件夹中。
解析
题目要求设计判断某个数n是否素数的函数prime,方法是:看在2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。
转载请注明原文地址:https://kaotiyun.com/show/wHTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了通过传值方式来传送过程参数,在函数声明部分应使用的关键字为()。
下列关于栈叙述正确的是( )。
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommandl_Click()Fori=1To4X=4Forj=1To3X=3Fork=1to2X=X+6NextkNextjNe
窗体上有1个名称为Text1的文本框和1个名称为Label1的标签。运行以下程序,在文本框中输入VisualBasic,则标签中显示内容为basic的是
下面是求最大公约数的函数的首部:Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是( )。
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性,该属性为
在窗体上画一个通用对话框控件CD1,则执行以下程序段后,在显示的"打开"文件对话框的"文件类型"框中显示的信息是CD1.Filter="所有文件|*.*|Word文件|*.Doc|文本文件|*.Txt"CD1.FilterIndex=2CD1
一个栈的初始状态为空。现将元素1、2、3、4、5、A、B、C、D、E依次入栈,然后再依次出栈,则元素出栈的顺序是()。
对下列二叉树进行前序遍历的结果为()。
随机试题
沉积岩的岩性及岩相变化的规律是受沉积()控制的。
A.肝B.心C.脾D.肺E.肾具有运化水液功能的脏是
中医学称急性蜂窝组织炎为
以下各项中,()是托运人不可转让的单据。
在咨询过程中最重要、最关键的心理特质是()。
赖某是市教委的职员,因不服市教委关于其工资和职称问题的处理,多次到中央、省、市有关部门上访。根据上级的要求,市教委对赖某反映的问题进行复查,将复查材料呈报给省教委和国家教委。该报告载明:“关于赖某反映的问题,我委对此非常重视,经再次进行认真的调查研究,并形
两刑警在追击某犯罪嫌疑人的过程中,租了一辆出租车。出租车不幸被犯罪嫌疑人炸毁,司机被炸伤,犯罪嫌疑人被刑警击毙。该司机正确的救济途径是下列哪一项?()
我不在犯罪现场。如果我在,那么,我没有犯罪。如果我犯了罪,那么,一定是我神志不清。以下哪项与上述论证最相似?
新生代可分为第三纪和第四纪,第三纪时发生了一次规模巨大的______造山运动,第四纪生物发展史上的重大飞跃是出现了______。
设c1和c2是类MyClass的对象,若将前缀运算符"--"和运算符"/"作为类MyClass的友元函数重载,则表达式--c1/c2等价于
最新回复
(
0
)