首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sj5.vbp,其窗体上有一个文本框,名称为Textl;还有一个命令按钮,名称为Commandl,标题为“输出结果”,如图64—6所示。并有一个函数isPrimeNum可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数
在考生目录下有一个工程文件sj5.vbp,其窗体上有一个文本框,名称为Textl;还有一个命令按钮,名称为Commandl,标题为“输出结果”,如图64—6所示。并有一个函数isPrimeNum可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数
admin
2010-07-13
14
问题
在考生目录下有一个工程文件sj5.vbp,其窗体上有一个文本框,名称为Textl;还有一个命令按钮,名称为Commandl,标题为“输出结果”,如图64—6所示。并有一个函数isPrimeNum可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回true,否则返回false。请编写适当的事件过程,使得在运行时,单击“输出结果”按钮,则找出大于2 000的最小素数,并显示在Textl中。
注意:保存时必须存放在考生文件夹下,窗体文件名为sj5.frm,工程文件名为sj5.vbp。
选项
答案
本题重点考查函数调用、For循环语句、If判断语句。素数的判断准则就是看该数除了1及其本身外是否别无其他约数。要找出大于2 000的最小素数,可以用FOR循环语句逐个对大于2 000的整数通过调用原题提供的isPrimeNum()函数判断其是否为素数,若找到第一个素数,这就是最小素数,将其赋给Textl的Text属性,并用Exit For结束循环。 根据题意,双击Commandl进入代码窗口,补充后的代码如下: Private Sub Commandl_Click() Dim a As Integer Dim b AS
Boolean
a=2000 b=
isPrimeNum(a)
Wbile b=False a=a+1 b=
isPrimeNum(a)
Wend Textl.
Text
=a End Sub Function isPrimeNum(num As Integer)As Boolean isP rimeNum=True Dim i AS Integer For i=2 To hum-1 If num Mod i=0 Then isPrimeNum=False Exit For End If Next i End Function 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://jikaoti.com/ti/jyg0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是【】。
下列不属于JComponent类的功能的是( )。
在Java语言中的实数,如数字后没有任何字母,计算机默认其为【】类型。
Java程序编译后的形式叫做( )。
数据流图用于抽象描述一个软件的逻辑模型,数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是( )。
下列程序执行的结果是( )。publicclassTest{publicstaticvoidmain(String[]args){inti,j,k;for
下面不属于软件设计原则的是( )。
在Java中,能实现多重继承效果的方式是
下列创建一个标识有“关闭”按钮的语句是______。
在Java源文件中,什么类最多只能有一个,而其他类的个数不限?
随机试题
重度烧伤休克出现烦躁不安的主要原因是
关于木材的强度指标的大小关系,以下说法中正确的是()。
投加化学药剂对气浮效果的促进作用是()。
有一等边三桩承台基础,采用沉管灌注桩,桩径为426mm有效桩长为24m。有关地基个土层分布情况,桩端主力特征值qpn,桩侧阻力特征值qsia及桩的布置、承台尺寸等如图5-7所示。已知b0=2427mm,h0=890mm。剪跨比λx=ax/h0=0.0
营业执照企业注册地与企业经营办公地不一致的原因,不可能的是()
关于基金业绩比较基准,以下表述错误的是()。[2015年9月真题]
上行文的行文方式中没有的是()。
能考察随机的、偶然的误差对测量的影响的有()。
什么是一般迁移?什么是特殊迁移?分别阐述一种与之相关的学习迁移理论。
与金币本位制度相比,金块本位和金汇兑本位对汇率的稳定程度()。
最新回复
(
0
)