首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时
admin
2018-10-29
16
问题
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合,例如24可以分解为5和19,也可以分解为11和13,要求取含有最小素数的组合,如图3-178所示)。
要求编写“分解为”按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码,以实现上述功能。过程IsPrime用来判断一个数是否为素数,如果是,返回值为True,否则返回值为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 Label1.Caption=i Label2.Caption=n-i Exit For End If Next 步骤2:按<F5>键运行程序,在文本框中输入23456,单击“分解为”按钮。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://jikaoti.com/ti/IDm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有1个名称为Command1的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序:PrivateSubCommand1_Click()DimxAsString,sAsString,tempAsString
假定在图片框Picture1中装入了一个图片,在程序运行中,为了清除该图片(注意,清除图片,而不是删除图片框),应采用的正确方法是( )。
可以产生30~50(含30和50)之间的随机整数的表达式是( )。
阅读程序:OptionBase1PrivateSubForm_Click()Dima(3,3)AsIntegerFori=1To3Forj=1To3a(
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click() d=0 c=10 x=Array(10,12,21,32,24) Fori=
能够产生1到50之间(含1和50)随机整数的表达式是( )。
如果把命令按钮的Cancel属性设置为True,则程序运行后( )。
工程中有Form1、Form2两个窗体(Forml中有文本框Text1,Form2中有Text1文本框和command1命令按钮)。Form1是启动窗体。在这些模块中编写下面的程序代码:Form1中的代码如下:PrivateS
窗体上有1个Timerl计时器,1个Shape1形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubForm_Load()flag=TrueTimer1.Enab
随机试题
Ifyou________thedoctor’sorderslastweek,you________homenow.
特发性心肌炎是
克隆病的病理改变最有意义的是
某女患者,50岁,近1年月经紊乱,现阴道出血3个月余,量时多时少,伴有烘热汗出,心烦不寐等。临诊时,首先应选择哪一项诊治方法
下列说法正确的是:
安全电压灯具的供电回路工作电流不宜大于()A。
县级以上各级政府决算草案经本级人民代表大会常务委员会批准后,本级政府财政部门应当自批准之日起()日内向本级各部门批复决算。
2010年1~3月,法国货物贸易进出口总额为2734.4亿美元,同比增长13.4%。其中,出口1264.7亿美元,同比增长14.5%;进口1469.7亿美元,同比增长12.4%;逆差205.0亿美元,同比增长1.0%。1~3月,中法双边贸易额为1
Self-discipline:theFoundationofProductiveLivingI.Issuestobenoticedatthethoughtofself-disciplineA.Troublesf
Whatmakesagoodmanager?Thereisn’tmagicformulaforgoodmanagement,ofcourse,butifyou’reamanagerperhapsthesetips
最新回复
(
0
)