首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Textl;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3-20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Textl;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3-20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
admin
2016-03-22
49
问题
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Textl;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3-20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。请编写适当的事件过程,使得在运行时,单击“计算”按钮,则找出大于15000的第一个素数,并显示在Text1中;单击“存盘”按钮,则把Text1中的计算结果存入考生文件夹下的out5.txt文件中。
注意:考生不得修改isprime函数过程和控件的属性,必须把计算结果通过单击“存盘”按钮存入out5.txt文件中,否则无成绩。
选项
答案
【操作步骤】 步骤1:打开本题对应工程文件sjt5.vbp。 步骤2:双击窗体Forml上的“计算”按钮,打开代码编辑窗口,在其Click事件过程中输入如下代码: 参考代码: Private Sub C1 C1ick() a%=15000 Do a%=a%+1 Loop Until isprime(a%) Text1.Text=a% End Sub 步骤3:双击窗体Forml上的“存盘”按钮,在代码编辑窗口其Click事件过程中输入如下代码: 参考代码: Private Sub C2 C1ick() Open App.Path&“\out5.txt”For Output AS#1 Print#1,Text1.Text C10se#1 End Sub 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/iMLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果将文本框的Locked属性设置为True,则以下说法正确的是
数据库设计包括两个方面的设计内容,它们是
有序线性表能进行二分查找的前提是该线性表必须是存储的。
在VisualBasic集成环境中,可以列出工程中所有模块名称的窗口是
下面的语句用Array函数为数组变量a的各元素赋整数值:a=Array(1,2,3,4,5,6,7,8,9)针对a的声明语句应该是
设有如下程序:PrivateSubForm_Click()Dimary(1To5)AsIntegerDimiAsIntegerDimsumAsIntegerFori=1To5
下列各选项说法错误的一项是
设已打开5个文件,文件号为1,2,3,4,5。要关闭所有文件,以下语句正确的是
下面的数组声明语句中正确的是
下面的数组声明语句中()是正确的。
随机试题
足部鼻反射区适应症包括()。
试述劳动者违反劳动合同的赔偿责任。
以人体肾脏严重受损,骨质软化、疏松和变形为主要症状的慢性中毒,是由于环境()污染通过食物链而引起的
A、水提醇沉法B、醇提水沉法C、醇提醚沉法D、铅盐沉淀法E、酸提碱沉法用酸性水从药材中提取出生物碱后再使其从水中析出的方法为()
根据现行制度规定,A股的佣金根据成交金额按比例收取,起点为1元。()
A.marineB.havediscoveredC.slowsPhrases:A.Thisturbulencemusesfrictionand【T1】______thefishdownB.Anotherkindof【
下列选项中,不属于沈家本参与制定的法律是()。
Aperson’shomeisareflectionofhispersonality.Dependingonpersonality,mosthaveinminda(n)"【C1】______home".Butingen
(1)GeraldFeinberg,theColumbiaUniversityphysicist,oncewentsofarastodeclarethat"everythingpossiblewilleventually
Perhapsthemythoftheperfectcommunicatorcomesfrombelievingtoostronglyinnovels,television,orfilms.Intheseplaces
最新回复
(
0
)