首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件(如图3.116所示)。请编写适当的事件过程完成以下功能:单击“读数”按钮,则把考生目录下的in5.txt文件中的一个整数放入Text1;单击“计算”按钮,则计算出大于该数的第一个素数,并
在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件(如图3.116所示)。请编写适当的事件过程完成以下功能:单击“读数”按钮,则把考生目录下的in5.txt文件中的一个整数放入Text1;单击“计算”按钮,则计算出大于该数的第一个素数,并
admin
2020-07-22
22
问题
在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件(如图3.116所示)。请编写适当的事件过程完成以下功能:单击“读数”按钮,则把考生目录下的in5.txt文件中的一个整数放入Text1;单击“计算”按钮,则计算出大于该数的第一个素数,并显示在Text2中;单击“存盘”按钮,则把找到的素数存到考生目录下的out5.txt文件中。
注意:在结束程序运行之前,必须单击“存盘”按钮,把结果存入out5.txt文件,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开本题对应工程文件sjt5.vbp。 步骤2:双击窗体Form1上的“计算”按钮,打开代码编辑窗口,在其Click事件过程中输入如下代码。参考代码: Private Sub Command2_Click() a%=CInt(Text1.Text) Do a%=a% + 1 Loop Until isprime(a%) Text2.Text=a% End Sub 步骤3:编写判断素数的函数过程isprime,参考代码为: Function isprime(a As Integer) Dim flaq As Boolean k%=2 flag=True While k%<=Int(a/2) And flag If a/k%=Int(a/k%)Then flag=False End If k%=k%+1 Wend isprime=flag End Function 步骤4:按
键运行程序,先单击“读数”按钮,接着单击“计算”按钮,最后单击“存盘”按钮。 步骤5:按要求将文件保存至考生文件夹中。
解析
程序设计思路:要找出大于给定数.的最小素数,可以首先将给定数加1赋值给变量a,通过调用函数isprime(a),以其返回值不是素数作为Do循环语句的循环条件,在循环体中加入语句:a=a+1实现每执行循环体一次变量a的值加1,当循环结束时a的值即为所求。
转载请注明原文地址:https://kaotiyun.com/show/jAHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于VB特点的叙述中,错误的是( )。
要求如果x被7除余2,则输x的值,下列语句中不能实现此功能的语句是()。
假定Picturel和Textl分别为图片框和文本框的名称,则下列错误的语句是()。
在程序运行时,下面的叙述中正确的是()。
在用Open语句打开文件时,如果省略“For方式”,则打开的文件的存取方式是()。
设工程中有Form1、Form2两个窗体,要求单击Form2上的Command1命令按钮,Form2就可以从屏幕上消失,下面的事件过程中不能实现此功能的是()。
输入VisualBasic源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用
线性表常采用的两种存储结构是()。
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
C语言函数返回值的类型是由______决定的。
随机试题
CC7555定时器的电路由电阻分压器、电压比较器、基本RS触发器、MOS管开关和输出缓冲级等几个基本单元组成。
可以补胃虚,清胃热,降胃逆的方剂是
甲类传染病有丙类传染病有
辅酶与辅基的区别是
按工程管线性能和用途分类,城市工程管线的种类包括()。
根据有关规定,下列关于承包人垫资的表述不正确的是()
下列关于时间片的进程调度的叙述,正确的有()。
1,1,3,18,180,()。
Afeverusually____________________(意味着身体有毛病).
ALetterofApologyForthispart,youareallowed30minutestowritealettertomakeanapologytoyourroommateXiaGang
最新回复
(
0
)