首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数
admin
2015-06-30
17
问题
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合,例如24可以分解为5和19,也可以分解为11和13,要求取含有最小素数的组合,如图所示)。要求编写“分解为”命令按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码,以实现上述功能。过程IsPrime用来判断一个数是否为素数,如果是,返回值为True,否则返回值为False。
注意:不得修改原有程序和控件的属性。至少正确运行一次程序,且程序运行时在文本框中输入23456,单击“分解为”按钮,将结果显示在标签中,否则将没有成绩,最后将修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Function IsPrime(ByVal x As Integer) As Boolean Dim i As Integer IsPrime = False If x = 1 Then Exit Function For i = 2 To Sqr(x) If x Mod i = 0 Then Exit Function End If Next IsPrime = True End Function Private Sub Command1_Click() ’考生编写程序开始 ’==================== ’======================= ’考生编写程序结束 Open App.Path & "\out5.dat" For Output As #1 Print #1, Text1.Text, Label1.Caption, Label2.Caption Close #1 End Sub 程序结束 参考答案 For i = 1 To Val(Text1.Text) 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://kaotiyun.com/show/skQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上有一个命令按钮Command1,编写如下程序:PrivateSubCommand1_Click()Printpp1(3,7)EndSubPublicFunctionpp1(xAsSingle
用Print方法在Form1窗体中显示出4个#号的正确代码为()。
下列关于图像框控件和图片框控件的说法错误的是()。
有下列程序段,单击命令按钮执行程序后,输出结果为()。OptionBase1PrivateSubCommand1_Click()Dimxx=Array(23,-5,17,38,-31,46,11,8,5,-4)
一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的【】。
执行下列语句后,显示输入对话框,此时如果单击“确定”按钮,则变量strInput的内容是______。atrlnput=-InputBox(“请输入字符串”,“字符串对话框”,“字符串”)
使图形能自动按控件大小而改变的控件是______。
软件设计模块化的目的是【】。
下列表达式中值为-6的是
下面关于完全二叉树的叙述中,错误的是______。
随机试题
下列关于排水盲沟施工的说法,错误的是()。
在工程测量的基本程序中,设置纵横中心线的紧后工序为()。
flower
A.38~174U/LB.90~200U/LC.0.02~0.13U/LD.<0.2UG/LE.50~85UG/L肌酸激酶的参考值()
排便反射的感受器分布于
下列税金中,需要通过“主营业务税金及附加”科目核算的有()。
增长极理论的基本思想是经济增长并非同时出现在所有地方和部门,而是首先集中在某些具有创新能力的行业和主导产业部门,而这些行业通常聚集在某些地区或者大城市中心等。根据这一理论可以得出的结论是()。
司法活动最高的价值追求是()
TheAmericanTwo-partySystemI.IntroductionA.theoldestpolitical【T1】______aroundtheworld【T1】______B.theclassicalexam
Googlehasanambitiousvisionforspectacles.OnJune27thSergeyBrin,oneofthecompany’sco-founders,revealedthenextsta
最新回复
(
0
)