首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数
admin
2016-06-23
39
问题
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合,例如24可以分解为5和19,也可以分解为11和13,要求取含有最小素数的组合,如图所示)。要求编写“分解为”命令按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码,以实现上述功能。过程。IsPrime用来判断一个数是否为素数,如果是,返回值为True,否则返回值为False。
注意:不得修改原有程序和控件的属性。至少正确运行一次程序,且程序运行时在文本框中输入23456,单击“分解为”按钮,将结果显示在标签中,否则将没有成绩,最后将修改后的文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 参考代码 For i=1 To Val(Text1.Text)’i从1开始,第一个找到的肯定就是满足条件的最小素数 If IsPrime(i)And IsPrime(Val(Text1.Text)-i)Then’定两个数是否都满足素数条件 Label1=i Label2=Val(Text1.Text)-i Exit For End If Next i 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/o9J0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要使菜单项MenuOne在程序运行时失效,使用的语句是
下列叙述中,不属于软件需求规格说明书的作用的是
某二叉树中度为2的结点有18个,则该二叉树中有______个叶子结点。
要使控件与框架捆绑在一起,以下操作正确的是()。
为了使图像框适应图片的大小,下列哪个属性设置正确
下列叙述中正确的是()。
执行以下程序段后,变量C$的值为()。A$="VisualBasicPrograming"B$="Quick"C$=B$&Ucase(Mid$(A$,7,6))&Right$(A$,11)
要使文本框获得输入焦点,则应采用文本框控件的方法是
对长度为n的线性表排序,在最坏情况下,比较次数不是n(n-1)/2的排序方法是
设有整型变量s,取值范围为0~100,表示学生的成绩。有如左边程序段:右边用SelectCase结构改写上述程序,使两段程序所实现的功能完全相同。请填空。Ifs>=90ThenSelectCasesLev
随机试题
两个二进制数1110010和100111相加的结果是()
类风湿性关节炎最早出现的关节症状是
甲公司的“力力”牌商标于2003年1月经国家商标局注册。2006年4月,“力力”文字与图形商标由国家有关部门认定为全国驰名商标。乙公司是一家生产咖啡为主的饮品公司,2004年7月6日他们将自己的产品的装潢以外观设计专利向国家专利局提出申请,并获批准。而其装
以下关于营业税中营业额的确定,正确的有( )。
府城房地产开发公司为内资企业,公司于2011年1月一2014年2月开发东丽家园住宅项目,发生相关业务如下:(1)2011年1月通过竞拍获得一宗国有土地使用权,合同记载总价款17000万元,并规定2011年3月1日动工开发。由于公司资金短缺,于2
我国南方流传最广、影响最大的一种民间木刻画是()。
物流控制的核心是()。
在当初,像希腊这样一个文明古国长期被土耳其统治,_______略有文明记忆的人一定会非常痛苦。这种感觉,比一般的亡国之痛还要强烈,_______文明早已成为一种生态习惯,却要全部拆散,用一种低劣的方式彻底替代。填入画横线部分最恰当的一项是()。
设函数f(x)在[a,b]上有连续导数,在(a,b)内二阶可导,且f(a)=f(b)=0,∫abf(x)dx=0.证明:(1)在(a,b)内至少存在一点ξ,使得f’(ξ)=f(ξ);(2)在(a,b)内至少存在一点η,且η≠ξ,使得f"(η)=f(η)
Thesecretaryworkedlateintothenight,(prepare)______alongspeechforthepresident.
最新回复
(
0
)