首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数
admin
2015-06-30
66
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
建立一个通讯录的随机文件phonBook.txt,内容包括姓名、电话、地址和邮编,用文本框输入数据。单击“添加主记录”按钮Command1时,将文本框数据写入文件,单击“显示”按钮Command2时,将文件中所有记录内容显示在立即窗口。Priva
在窗体上设计两个复选框,一个显示粗体,另一个显示斜体,通过对复选框的选择,在一个文本框中显示相应效果的文本,请完成下列程序。PrivateSubForm_Load()Check1.Caption="显示粗体"
对关系S和R进行集合运算,结果中既包含S中的所有元组也包含R中的所有元组,这样的集合运算称为()。
使用“打开”对话框的方法是()。
窗体上有一个命令按钮Commalld1和一个列表框List1。先选择列表框中的某一个项目,然后单击命令按钮,将该项目从列表框删除。程序如下:PrivateSubCommand1_Click()DimInAsInteger
如果A为整数且|A|>=10,则打印“OK”,否则打印“Error”,表示这个条件的单行格式If语句是()。
变量未赋值时,数值型变量的值为______,字符串变量的值为______。
下列叙述菜单设计的语句中正确的是()。
两个关系有若干相同属性名等值连接,并去掉重复属性的关系代数运算称为______。
树是结点的集合,它的根结点数目是
随机试题
班主任张老师按照学生的期中考试成绩调整座位,将考试成绩后五名的同学安排在教室的最后一排。张老师的做法()。
对消费者的行为具有最广泛和最深远的影响的是
Thereareonly______daysleftbeforesummerholidays.
男性40岁,2小时前突然胸剧痛,呼吸困难进行性加重,体检:发绀,大汗,烦躁不安,右肺呼吸音减弱,BP12/8kPa(90/60mmHg),心率120次/分上述患者最可能的诊断是
A.口服法B.灌注法C.穿刺注入法D.生理排泄法E.直接引入法胃造影常用
对多个样本均数进行两两比较的q检验,以下正确的一项是
依照我国土地承包法,不宜采取家庭承包的“四荒”农村土地,其土地承包经营权依法可采取哪些方式流转?()
已知离心式压缩机多变压缩过程,进口压力P1=101.3×103Pa,出口压力P2=200×103Pa,空气进口温度为20℃,空气气体常数R=287.64J/(kg.k),则压缩质量为1kg空气的等温功N等温为()J/kg。
下列估价中宜采用假设开发法的有()。
安全生产检查制度是()对劳动安全卫生法律、法规、制度的实施依法进行监督检查的制度。
最新回复
(
0
)