首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Textl的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprirne(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Textl的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprirne(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,
admin
2015-06-30
22
问题
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Textl的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprirne(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。
请编写适当的事件过程,使得程序运行时,单击“计算”按钮,找出小于18000的最大素数,并显示在Text1中;单击“存盘”按钮,则将Text1中的计算结果存入考生文件夹下的out5.txt文件中。
注意:考生不得修改isprime函数过程和控件的属性,必须把计算结果通过“存盘”按钮存入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 If isprime(i) Then Text1 = 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/8wQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行下面的程序段后,变量c的值为a=14b=30SelectCaseb\10Case0c=a*10+bCase1To9
在窗体上画一个名称为Labell的标签,然后编写如下事件过程。PrivateSubForm_Click()Dimarr(10,I0)AsIntegerDimiAsInteger,jAsInte
数据库设计包括两个方面的设计内容,它们是______。
执行以下Command1的Click事件过程在窗体上显示OptionBase1PrivateSubCommand1_Click()Dimaa=Array("a","b","c","d","e","f","g
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimnumAsIntegernum=1DoUntilnum>6
下列哪个是面向对象程序设计不同于其他语言的主要特点?
设已打开5个文件,文件号为1、2、3、4、5。要关闭所有文件,则下列语句中正确的是()。
以下说法不正确的是
关于多行结构条件语句的执行过程,正确的说法是()。
随机试题
企业经营战略的特点不包括()
模特甲从摄影师乙为自己拍摄的照片中选择了100张,汇编成摄影集,并由出版社出版。该汇编作品的作者是模特甲本人。()
诊断考虑如行骨髓穿刺检查,则骨髓象改变不符合的是
(2011年卷一第70题)除产生独特视觉效果外,下列哪些外观设计与现有设计相比不具有明显区别?
根据法律关系产生的依据、执行的职能和实现规范的内容不同,法律关系可以分为()。
在美国的佛罗里达海岸,城市的灯光曾造成刚破壳而出的小海龟迷路,使一些小海龟忽然直奔错误的方向,引导小海龟踏上了死亡之途。在很多场合下,即使动物们不直接暴露于灯光之下,它们也难以摆脱光污染的伤害,城区里的灯光会通过云层反射下来,使夜空处在非自然的光亮下,科学
(2013上海A类39)请从所给的四个选项中,选择最合适的一项填在问号处,使之呈现一定的规律性。
下列关于对象的叙述中,哪一条是不正确的?
在NetWare中,当工作站用户请求将数据和文件写入硬盘时,先将其写入内存缓冲区,然后以后台方式写入磁盘中,称为______。
Itisappropriateonananniversaryofthefoundingofauniversitytoremindourselvesofitspurposes.Itisequallyappropria
最新回复
(
0
)