首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3.77所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3.77所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
admin
2018-12-20
34
问题
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3.77所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。请编写适当的事件过程,使得在运行时,单击“计算”按钮,则找出大于15000的第一个素数,并显示在Text1中;单击“存盘”按钮,则把Text1中的计算结果存入考生文件夹下的out5.txt文件中。
注意:考生不得修改isprime函数过程和控件的属性,必须把计算结果通过单击“存盘”按钮存入out5.txt文件中,否则无成绩。
选项
答案
步骤1:打开本题对应工程文件sjt5.vbp。 步骤2:双击窗体Form1上的“计算”按钮,打开代码编辑窗口,在其Click事件过程中输入如下代码。参考代码: PriVate Sub C1_Click() a%=15000 Do a% =a% + 1 Loop Until isprime(a%) Text1.Text=a% End Sub 步骤3:双击窗体Form1上的“存盘”按钮,在代码编辑窗口其Click事件过程中输入如下代码。参考代码: Private Sub C2_Click() Open App.Path &"\out5.txt"For Outpult As #1 Print#l,Text1.Text Close #1 End Sub 步骤4:按要求将文件保存至考生文件夹中。
解析
素数的判断准则就是看该数除了1和其本身外有无其他约数。程序设计思路:要找出大于15000的第一个素数,可以定义一个初值为15000的整型变量a,通过调用函数isprime(a),以其返回值是素数(即isprime(a))作为Do循环语句的继续循环条件,在循环体中加入语句:a=a+1,实现每执行循环体一次变量a的值增加1,当循环结束时将a的值在文本框中显示出来。
要将结果存入考生文件夹下的out5.txt文件,可先用Open语句以输出方式打开该文件;然后通过Print语句将文本框中的内容写入打开的文件;最后用Close语句关闭打开的文件。
转载请注明原文地址:https://jikaoti.com/ti/2lm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定通过复制、粘贴操作建立了一个命令按钮数组Command1,以下说法中错误的是( )。
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:PrivateXAsIntegerPrivateSubCommand1_Click() X=5:Y=3
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是( )。
编写如下程序:PrivateSubCommand1_Click() Dima(3,3)AsInteger DimsAsInteger Fori=1To3 Forj=1To3 a(i,j)=i
如果改变驱动器列表框的Drive属性,则将触发的事件是( )。
窗体上有一个名称为VScroll1的垂直滚动条,要求程序运行时,滚动块的初始位置在最下端,应该使VScroll1.Value的值等于( )。
设有如下通用过程:PublicFunctionFun(xStrAsString)AsString DimtStrAsString,strLAsInteger tStr="" strL=Len(xStr) i=strL
设在窗体上有一个名称为Check1的复选框数组,并有以下事件过程:PrivateSubCheck1_Click(IndexAsInteger) …EndSub则下面叙述中错误的是( )。
下面不能作为结构化方法软件需求分析工具的是
设a=10,b=4,c=5,d=7,表达式a>bAndNotc
随机试题
足趾受到机械性损伤刺激时,可引起快痛与慢痛。下述正确的是
毛果芸香碱对眼的作用:
妊娠合并重度贫血的实验室检查诊断依据哪项是错误的:
细菌在局部生长繁殖进入血流,不在血中繁殖,属于哪一种类型的感染
最可能的诊断是此时的处理应
某公安机关侦查人员在依法对一起盗窃案件犯罪嫌疑人审查时,该嫌疑人趁人不备从3楼上跳下自杀未遂,造成伤残。其亲属认为公安机关应对此承担责任,故提出公安赔偿请求。根据《国家赔偿法》的规定,该事件不符合公安赔偿构成要件,国家不负赔偿责任。()
联系当前实际,谈谈如何通过法律助推新时期的社会发展。
人口老龄化
Whatdoesthemanwanttoorder?
Whatdowemeanbyasatisfactorystandardofliving?Obviously,itmustincludethebasicnecessitiesoflifesuchasfood,clo
最新回复
(
0
)