首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sj5.vbp,其窗体上有一个文本框,名称为Textl;还有一个命令按钮,名称为Commandl,标题为“输出结果”,如图64—6所示。并有一个函数isPrimeNum可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数
在考生目录下有一个工程文件sj5.vbp,其窗体上有一个文本框,名称为Textl;还有一个命令按钮,名称为Commandl,标题为“输出结果”,如图64—6所示。并有一个函数isPrimeNum可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数
admin
2010-07-13
43
问题
在考生目录下有一个工程文件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://kaotiyun.com/show/iGmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
Applet是能够嵌入到【】页面中,并能够在浏览器中运行的Java类。
数据结构分为逻辑结构和存储结构,循环队列属于【】结构。
给出下面不完整的类代码,则横线处的语句应该为( )。classPerson{Stringname,department;intage;publicPerson(Strings){nam
下列关于基本数据类型的说法中,不正确的是( )。
在结构化程序设计中,模块划分的原则是( )。
在Java源文件中,什么类最多只能有一个,而其他类的个数不限?
在软件生命周期中,能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是______。
下列操作中,不属于Applet安全限制的是
随机试题
给定资料1.陈阵:黄羊真是可怜,狼太可恶了。滥杀无辜,把别人的命都不当命。毕利格:不对,黄羊才是草原上的祸害。它们把草都吃没了。草原也有生命,是大命,所有其他的都是靠大命才生存的小命。陈阵:可是黄羊要那么可恶,您刚才干嘛还把那活的黄羊
税收具有强制性、固定性和无偿性三个特征。税收具有三个基本职能:________、________和________。
《本草经集注》记载药数为
再次使用青霉素需重做皮肤过敏试验的要求是
混凝土墙式护栏属于()。
征收作为政府的行政行为之一,必须体现合法行政的原则精神,而合法行政原则的一个基本要求就是()。
下列说法正确的是().
请设计一节写作课的教案,达到以下目的:(1)学生能够用英语写介绍culturalrelics的短文;(2)培养学生运用英语的能力;(3)引导学生形成正确对待文化遗产的态度。
[A]Evaluateyoursystem[B]Developasystemofyourown[C]Mixbusinesswithpleasure[D]Neverforgetyourresponsi
A、There’smuchtodobesidesworkandstudy.B、It’sconvenientforpeopletogoanywhere.C、Thenaturalenvironmentisbeneficia
最新回复
(
0
)