首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图2.20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图2.20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
admin
2016-12-29
62
问题
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图2.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:双击窗体Form1上的“存盘”按钮,在代码编辑窗口其Click事件过程中输入如下代码: 参考代码: Private Sub C2一C1 ick() Open App.Path&”\out5.txt”For Output As:#1 Print:#1,Textl.Text Close:#1 End Sub 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/z9Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若在某窗体模块中有如下事件过程:PrivateSubCommandlClick(IndexAsInteger)EndSub则以下叙述中正确的是()。
执行x$一InputBox(“请输人x的值”)时,在弹出的对话框巾输入123,在列表框Listl中选中一个列表项(数据为456),使结果为123456的语句是()。
关系数据库中能实现的专门关系运算包括__________、连接和投影。
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为()。
下列程序中,a,b,c代表一个三角形的三条边,程序的作用是判断一个三角形是否成立,请填写空白处。Ifa+b<c______b+c<a______a+c<bThenMsgBox("这三条边不能构成一个三角形")EndIf
阅读程序:PrivateSubForm_Click()a=0Forj=1To15a=a+jMod3NextjPrintaEndSub程序运行后,单击窗体,输出结果是______。
下面4项中不属于面向对象系统三要素的是()
要使单击命令按钮与按下<Esc>键实现相同的作用,则应设置()属性为True。
线性表若采用链式存储结构时,要求内存中可用存储单元的地址
随机试题
简析《高女人和她的矮丈夫》中“裁缝老婆”形象的意义。
何谓药物反应的个体差异?
对蛛网膜下腔出血病因的诊断,最有意义的辅助检查是
A.山楂B.谷芽C.莱菔子D.麦芽E.鸡内金
决策方案选择的具体方法有()。
根据商业银行法,企业事业单位可以自主选择一家商业银行的营业场所开立一个办理日常转账结算和现金收付的账户。这种账户属于:()
(2008年)有三个100Ω线性电阻接成△三相对称负载,然后挂接在电压为220V的三相对称电源,这时供电线路上的电流应为()A。
在分组对重整计划进行表决时,()即为该组通过重整计划。
某商品流通企业某种商品前11个月的实际销售量如下表所示:取m=4,用一次移动平均数法预测第12个月的销售量为()吨。
Untiltheseissuesareresolved,atechnologyofbehaviorwillcontinuetoberejected,andwithitpossiblytheonlywaytosol
最新回复
(
0
)