首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3-20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3-20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
admin
2016-01-31
16
问题
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3-20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。请编写适当的事件过程,使得在运行时,单击“计算”按钮,则找出大于15000的第一个素数,并显示在’Text1中;单击“存盘”按钮,则把Text1中的计算结果存入考生文件夹下的out5.txt文件中。
注意:考生不得修改isprime函数过程和控件的属性,必须把计算结果通过单击“存盘”按钮存入out5.txt文件中,否则无成绩。
选项
答案
审题分析 素数的判断准则就是看该数除了1和其本身外有无其他约数。程序设计思路:要找出大于15000的第一个素数,可以定义一个初值为15000的整型变量a,通过调用函数isprime(a),以其返回值是素数(即isprime(a))作为Do循环语句的继续循环条件,在循环体中加入语句:a=a+1,实现每执行循环体一次变量a的值增加1,当循环结束时将a的值在文本框中显示出来。 要将结果存入考生文件夹下的out5.txt文件,可先用Open语句以输出方式打开该文件;然后通过Print语句将文本框中的内容写入打开的文件;最后用Close语句关闭打开的文件。 操作步骤 步骤1:打开本题对应工程文件sjt5.vbp。 步骤2:双击窗体Form1上的“计算”按钮,打开代码编辑窗口,在其Click事件过程中输入如下代码: 参考代码: Private Sub C1_Click() a%=15000 Do a%=a%+1 Loop Unti1 isprime(a%) Text1.Text=a% End Sub 步骤3:双击窗体Form1上的“存盘”按钮,在代码编辑窗口其Click事件过程中输入如下代码: 参考代码: Private Sub C2_Click() Open App.Path&"\out 5.txt"For Output As #1 Print #1, Text1.Text C1ose #1 End Suh 步骤4:按要求将文件保存至考生文件夹中。 考点链接 Do循环和While循环、顺序文件。
解析
转载请注明原文地址:https://kaotiyun.com/show/HuLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定时钟控件的Interval属性为1000,Enabled属性为True,并且有下面的事件过程,计算机将发出()beep声。SubTimer1_Timer()Fori=1to10BeepNextiEn
CommonDialog控件可以显示()对话框。
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:PrivateSubCommandl_Click()DimiAsInteger,jAsIntegerDima(10,10)AsInteger
组合框有3种不同的类型,这3种类型是下拉式列表框、简单组合框和下拉式组合框,分别通过把Style属性设置为______来实现。
下列操作不能向工程中添加宙体的是()。
在文本框中输入字符时,通过()事件过程可以得到字符的ASCII码值。
执行下面程序,第一行输出结果是[],第二行输出结果是[]。OptionExplicitPrivateSubForm_Click()DimAAsIntegerA=2CallSub1(A)EndSubPriv
下面程序运行后,输出的结果是Dimarr(3,3)Forj=1To3Fork=1To3Art(j,k)=(j-1)*3+kNextkNextjForj=2To3Fork=2To3Printarr(k,j);
如果在C盘当前文件夹下已存在名称为studata.dat的顺序文件,那么执行语句Open"C:\studata.dat"ForAppendAs#1之后,将
随机试题
“一步法”防腐主要机具有上管机构、传动系统、除锈机、加热装置、挤出机、供料系统、冷却装置、()等。
阅读《门槛》中的一段文字,回答下列小题:姑娘跨进了门槛。——厚厚的门帘立刻放下来遮住了她。“傻瓜!”有人在后面咬牙切齿地咒骂。“一位圣人。”不知从什么地方传来这一声回答。“姑娘跨进了门槛”象征着什么?
新生儿假月经多发生于出生后
治疗慢性Ⅱ型呼吸衰竭患者,给氧的原则是
一次事故中死亡职工10人以上(含10人)的事故属于( )。
下列各项中.按税法规定可以不征或者免征土地增值税的有()。
谈谈对扩大公民知情权意义的理解。
行政组织具有鲜明的政治性,是为统治阶级的利益服务的。()
单位要举办“绿色环保宣传周”的活动。但是缺少专项经费,并且在活动的宣传中还不允许耗费纸张,要求“无纸化”办公,领导将这项工作交给你负责,你该如何开展此次宣传教育工作?
SupposeadepartmentstoreisrecruitingEnglish-speakingassistantstoworkduringthewinter.Writeanapplicationletterto
最新回复
(
0
)