首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Textl的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Textl的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则
admin
2017-12-14
81
问题
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Textl的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。
请编写适当的事件过程,使得程序运行时,单击“计算”按钮,找出小于18000的最大素数,并显示在Text1中;单击“存盘”按钮,则将Text1中的计算结果存入考生文件夹下的out5.txt文件中。
注意:考生不得修改isprime函数过程和控件的属性,必须把计算结果通过“存盘”按钮存入out5.txt文件中,否则将没有成绩。
选项
答案
函数过程isprime(a)的功能是通过Do While语句、If判断语句和Int函数,判断参数a是否为素数,如果是素数,则函数返回True,否则函数返回False。在单击“计算”按钮事件过程中,通过For语句和调用函数过程isprime(a),找出小于18000的最大的素数,并将其显示在Text1中;在单击“存盘”按钮事件过程中,通过文件操作把Text1中的计算结果存入考生文件夹下的out5.txt文件中。 【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Function isprime(a As Integer)As Boolean Dim flag As Boolean flag=True b%=2 Do While b%<=Int(a/2)And flag If Int(a/b%)=a/b%Then flag=False Else b%=b%+1 End If Loop isprime=flag End Function 程序结束 Private.Sub C1_Click() Dim i As Integer For i=17999 To 1 Step一1 Ifisprime(i)Then Textl=i Exit For End If Next End Sub Private Sub C2一Click() Open App.Path&“\out5,txt”For Output As#1 Print#1.Text1.Text Close#1 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/TgGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列有关数据库的叙述,正确的是()。
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将下面的程序补充完
下面程序代码实现单击命令按钮Command1时输出如下结果:1-1-111-1111该程序不完整,请填空。PrivateSubCommand1_Click()
执行下列语句后,显示输入对话框,此时如果单击“确定”按钮,则变量strlnput的内容是______。atrInput=InputBox("请输入字符串","字符串对话框","字符串")
软件设计中,有利于提高模块独立性的一个准则是
若在某窗体模块中有如下事件过程:PrivamSubCommand1_Click(IndexAsInteger)......EndSub则以下叙述中正确的是______。
下述关于数据库系统的叙述中正确的是______。
下列关于二叉树的叙述中,正确的是
下列叙述中正确的是
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
随机试题
对领导干部或者党政机关施政作为取得的成绩形成的总体看法和基本观点是
用坚实系数分类的方法,主要包括粉质黏土,潮湿的黄土,夹有碎石、卵石的砂,粉土混卵(碎)石,种植土、填土等坚实系数为0.6~0.8的工程用土是()
投机减缓价格波动作用的实现是有前提的:一是投机者要理性化操作;--是适度投机。()
施工方案是投标报价的一个前提条件,也是招标人评定中标人的依据之一。施工方案应由()主持制订。
下列有关期初余额审计的说法中,正确的是()。
A:CouldIinvitemyfriendstomyhousefortheDragonBoatFestival,Mom?B:【H1】______Thatsoundslikefun.A:Yeah.Ummm...Co
垂直管理部门的工作业务、人事任免、经费拨付,均由上级业务主管部门决定。下列哪个部门属于垂直管理部门?()
甲午中日战争后,中国清政府与日本于1895年4月17日在日本马关签订丧权辱国的《马关条约》。根据条约规定,中国割让()给日本。
A企业最近将现有的客户关系系统迁移至虚拟化平台,并对应用软件进行全面功能性升级。针对该过程,(43)________不能保证满足可用性、连续性。
Ifitwereonlynecessarytodecidewhethertoteachelementarysciencetoeverycneonamassbasisortofindthegiftedfewa
最新回复
(
0
)