首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Text1的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Text1的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则
admin
2019-08-21
44
问题
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Text1的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprime(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 Lcop isprime=flag End Function 程序结束 参考答案 Private Sub C1_Click() Dim i As Integer For i=17999 To 1 Step-1 If isprime(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:调试并运行程序,关闭程序后按题目要求存盘。
解析
函数过程isprime(a)的功能是通过Do While语句、If判断语句和Int函数,判断参数a是否为素数,如果是素数,则函数返回True,否则函数返回False。在单击“计算”按钮事件过程中,通过For语句和调用函数过程isprime(a),找出小于18000的最大的素数,并将其显示在Textl中;在单击“存盘”按钮事件过程中,通过文件操作把Text1中的计算结果存入考生文件夹下的out5.txt文件中。
转载请注明原文地址:https://kaotiyun.com/show/iOUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序段的输出结果是X=1:Y=4DoUnti1Y>4X=X*Y:Y=Y+1LoopPrintX
下列关于通用对话框CommonDialog1的叙述中,错误的是
假定有以下循环结构DoUntil条件表达式循环体Loop则以下正确的描述是
以下关于控件数组的叙述中,错误的是
下列关于函数过程的叙述中,正确的是()。
下面叙述不正确的是()。
设一棵树的度为4,其中度为4,3,2,1的结点个数分别为2,3,3,0。则该棵树中的叶子结点数为()。
随机试题
通常,筛查可以理解为
机电设备国际招标时,采用的评标方法大多数是( )。
根据计时观察法测得工人工作时间:基本工作时间61分钟,辅助工作时间9分钟,准备与结束工作时间13分钟,不可避免的中断时间6分钟,休息时间9分钟,则其作业时间与规范时间分别是()分钟。
白酒生产企业申报2004年度企业所得税应纳税所得额为—36万元。经税务机关核查,该企业发生100万元粮食类白酒广告支出,已作费用,全额在税前扣除;转让一台设备,取得净收入50万元,未作账务处理。税务机关要求该企业作出相应的纳税调整,并限期缴纳税款。但该企业
根据票据法律制度的规定,背书人在汇票上记载“不得转让”字样,其后手再背书转让的,将产生的法律后果是()。
关于正文版式设计,说法正确的有()。
人民警察的任务包括()。
两个杯中分别装有浓度40%与10%的食盐水,倒在一起后混合食盐水浓度为30%。若再加入300克20%的食盐水,则浓度变为25%。那么原有40%的食盐水()克。
将前缀运算符"--"重载为非成员函数,下列原型中能正确用于类中说明的是()。
WilshireCity’slowcorporatetaxratesmakeitagreatcommunityin______tostartanewbusiness.
最新回复
(
0
)