首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3.77所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3.77所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
admin
2018-12-20
45
问题
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3.77所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。请编写适当的事件过程,使得在运行时,单击“计算”按钮,则找出大于15000的第一个素数,并显示在Text1中;单击“存盘”按钮,则把Text1中的计算结果存入考生文件夹下的out5.txt文件中。
注意:考生不得修改isprime函数过程和控件的属性,必须把计算结果通过单击“存盘”按钮存入out5.txt文件中,否则无成绩。
选项
答案
步骤1:打开本题对应工程文件sjt5.vbp。 步骤2:双击窗体Form1上的“计算”按钮,打开代码编辑窗口,在其Click事件过程中输入如下代码。参考代码: PriVate Sub C1_Click() a%=15000 Do a% =a% + 1 Loop Until isprime(a%) Text1.Text=a% End Sub 步骤3:双击窗体Form1上的“存盘”按钮,在代码编辑窗口其Click事件过程中输入如下代码。参考代码: Private Sub C2_Click() Open App.Path &"\out5.txt"For Outpult As #1 Print#l,Text1.Text Close #1 End Sub 步骤4:按要求将文件保存至考生文件夹中。
解析
素数的判断准则就是看该数除了1和其本身外有无其他约数。程序设计思路:要找出大于15000的第一个素数,可以定义一个初值为15000的整型变量a,通过调用函数isprime(a),以其返回值是素数(即isprime(a))作为Do循环语句的继续循环条件,在循环体中加入语句:a=a+1,实现每执行循环体一次变量a的值增加1,当循环结束时将a的值在文本框中显示出来。
要将结果存入考生文件夹下的out5.txt文件,可先用Open语句以输出方式打开该文件;然后通过Print语句将文本框中的内容写入打开的文件;最后用Close语句关闭打开的文件。
转载请注明原文地址:https://kaotiyun.com/show/gyFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下过程定义中正确的过程首行是( )。
有如下过程代码:Subvar_dim() StaticnumaAsInteger DimnumbAsInteger numa=numa+2 numb=numb+1 printnuma;numbEndSub连续3次
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click() s=0 Fori=1To15 x=2*i-1 IfxMod
数据库管理系统是( )。
设a、b都是自然数,为求a除以b的余数,某人编写了以下函数:Functionfun(aAsInteger,bAsInteger)Whilea>b a=a-bWendfun=aEndFunction在调试时发现函数是错
假定在图片框Picture1中装入了一个图片,在程序运行中,为了清除该图片(注意,清除图片,而不是删除图片框),应采用的正确方法是( )。
要使两个单选按钮属于同一个框架,下面三种操作方法中正确的是( )。①先画一个框架,再在框架中画两个单选按钮②先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中③先画两个单选按钮,再画框架将单选按钮框起来
下面不属于软件工程过程的4种基本活动
随机试题
一般来说,次序可分为_______、_______、_______和_______。
“无产阶级及其政党要实现自己对同盟者的领导”的思想属于毛泽东的()
毛泽东思想经过多方面展开达到成熟,是在( )
A.清肝芦荟丸合黄连阿胶汤B.龙胆泻肝汤合仙方活命饮C.二陈汤合四七汤加减D.十全流气饮加减E.归脾汤合二陈汤
A.一次常用量B.3日常用量C.5日常用量D.7日常用量E.15日常用量门诊对患者开具的麻醉药品注射剂,每张处方为
安全生产监察方式一般有______监察和______监察。
下列关于景德镇的表述正确的是()。
无线设备加入无线局域网服务区时首先要进行的工作步骤是()。
下列对“转基因食品”这一概念的理解,符合文意的一项是()。根据第三段内容下列说法错误的一项是()。
若f(x)=3x3一kx2+4被3x一1除以后余数为3,则k=().
最新回复
(
0
)