首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有,一个工程文件sjt5.vbp,其窗体上有一个名称为Textl的文本框;还有两个名称分别为Cl、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程。isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数
在考生文件夹下有,一个工程文件sjt5.vbp,其窗体上有一个名称为Textl的文本框;还有两个名称分别为Cl、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程。isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数
admin
2020-07-22
29
问题
在考生文件夹下有,一个工程文件sjt5.vbp,其窗体上有一个名称为Textl的文本框;还有两个名称分别为Cl、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程。isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回Trme,否则返回False。
请编写适当的事件过程,使得程序运行时,单击“计算”按钮,找出小于18000的最大素数,并显示在Textl中;单击“存盘”按钮,则将Textl中的计算结果存入考生文件夹下的out5.txt:文件中。
注意:考生不得修改isprime函数过程和控件的属性,必须把计算结果通过“存盘”按钮存入out5.txt文件中,否则将没有成绩。
选项
答案
函数过程isprime(a)的功能是通过Do Wile语句、If判断语句和Int函数,判断参数a是否为素数,如果是素数,则函数返回True,否则函数返回False。在单击“计算”按钮事件过程中,通过For语句和调用函数过程isprime(a),找出小于18000的最大的素数,并将其显示在Textl中;在单击“存盘”按钮事件过程中,通过文件操作把Textl中的计算结果存入考生文件夹下的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%+l End If Loop isprime=flag End Function 程序结束 Private Sub C1_Click() Dim i As Integer For i=17999 To l Step_1 If isprime(i)Then Textl=i Exit For End If Next End Sub Private Sub C2_Click() Open App.Path&“\out6.txt”For Output As#1 Print#1.Textl.Text Close#l End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/NCHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行下列语句 strlnput=InputBox("请输入字符串","字符串对话框","字符") 将显示输入对话框。此时如果直接单击"确定"按钮,则变量strlnput的内容是
以下关于控件的叙述中,正确的是
为了使标签Labell透明且不具有边框,以下正确的属性设置是
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
已知a=6,b=15,c=23,则语句PrintSgn(a+bMod6-c\a)&a+b的输出结果为( )。
下面不属于需求分析阶段任务的是()。
下列工具中,不属于结构化分析的常用工具的是()。
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
为了声明一个长度为128个字符的定长字符串变量StrD,以下语句中正确的是( )。
随机试题
苏子降气汤中配伍当归的用意是
A.里急后重,便下脓血,赤多白少,渴欲饮水,舌红脉弦数B.腹痛便下脓血,下痢赤白,里急后重,苔黄腻,脉象滑数C.腹痛下利,身热口苦,嗳腐吞酸,舌红苔黄,脉象滑数D.热痢初起,下利臭秽,肛门灼热,身热口渴,苔黄脉数葛根黄芩黄连汤的主治是
女,46岁,近一个月来粪便中有黏液或脓血,每天大便4~5次,肛门坠胀感,此时最先要作的检查为
石先生,男,56岁,患尿毒症,精神萎靡。下腹无胀满,24小时尿量为60ml。病人的排尿状况属于
某市房地产开发企业2010年需要缴纳的下列税种中,应向该市地方税务局申报缴纳的有()。(2011年)
根据《中华人民共和国宪法》的规定,下列哪一个职位可以连续任职超过两届?()
我们要继续锲而不舍,一以贯之抓好社会主义精神文明建设,为全国各族人民不断前进提供坚强的思想保证、强大的精神力量、丰润的道德滋养。社会主义精神文明建设的重要内容和中心环节是()。
过度学习是指()
Accordingtothetextadvertisingisimportantto______.Thetextmakesapointthatgoodswillsellwellif______.
StudyHabitsIncollegeinanyclass,youwillfindwidelydifferenttypesofpeople,notonlyinpersonalitybutalsoinsc
最新回复
(
0
)