首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时
admin
2017-10-27
35
问题
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合,例如24可以分解为5和19,也可以分解为11和13,要求取含有最小素数的组合,如图3—178所示)。
要求编写“分解为”按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码,以实现上述功能。过程IsPrime用来判断一个数是否为素数,如果是,返回值为Tree,否则返回值为False。
注意:不得修改原有程序和控件的属性。至少正确运行一次程序,且运行时在文本框中输入23456,单击“分解为”按钮,将结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口的指定位置编写以下代码 参考代码: Dim i As Integer Dim n As Integer n=Val(Text1.Text) If n Mod 2 <> 0 Then MsgBox"请输入偶数!" Exit Sub End If For i=2 To n/2 If IsPrime(i)And IsPrime(n-i)Then Labe11.Caption=i Labe12.Caption=n-i Exit For End If Next 步骤2:按
键运行程序,在文本框中输入 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/kVGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写下列事件过程和函数过程:PrivateSubCommandlClick()Dimnum(1To6)AsSinglenum(1)=103:num(2)=190:num(3)=0num(4)=32:num(5)=-56:num(6)=
VisualBasic程序设计采用的编程机制是
按条件f对关系R进行选择,其关系代数表达式是
确定一个控件在窗体上的大小的属性是
有如下函致:Functionfact(xAsInteger)AsLongDimpAsLong,iAsIntegerp=1Fori=1Toxp=p*1Nex
以下关于函数过程的叙述中,正确的是()。
软件工程中,软件配置由配置项来表示,以下选项中,______不属于软件配置项的内容。
下列程序共执行了______次循环。PrivateSubCommand1_Click()DimintsumAsIntegerDimiASIntegerDimjAsIntegeri=1
以下关系表达式中,其值为False的是______。
如下图所示的二叉树,若按后序遍历,则其输出序列为【】。
随机试题
盖碗只适合冲泡各种乌龙茶、红茶
He______workingtillhewasseventyyearsold.
男性,54岁,酗酒后8小时出现中上腹疼痛,放射至两侧腰部,同时出现恶心、呕吐。体检腹部有压痛、肌紧张,两侧腰腹部可见蓝棕色斑,血压75/55mmHg,脉搏110次/分。应首先选择的检查
关于回避,下列哪一说法是正确的?(2010年卷三第37题)
下面关于场地标高与周边道路标高的关系说法正确的是:
建设工程合同管理的特点主要是由()的特点决定的。
创造过程中的类比包括直接类比和拟人类比。直接类比是指从自然界的现象中或人类社会已有的发明成果中寻找与创造对象相类似的事物,并通过比较启发出创造性设想的一种方法。拟人类比是指把创造发明的对象人格化,假如自己是该对象时,在该种情况下会如何办的一种方法。根据上述
[*]
下列变量定义中,正确的是
Underthiscity’stranquilsurfaceliesafriendlybutradicalcoreofprogressives,leftists,tree-huggersandeco-warriors.
最新回复
(
0
)