首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数
admin
2018-06-29
34
问题
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合,例如24可以分解为5和19,也可以分解为11和13,要求取含有最小素数的组合,如图所示)。要求编写“分解为”命令按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码,以实现上述功能。过程lsPrime用来判断一个数是否为素数,如果是,返回值为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 EndIf Next i 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
Function IsPrime()函数用来判断一个数是否为素数,在处理循环变量的上限时,为了节约循环的次数,设置为Sqr(x)为x的平方根,如果x能被循环变量的值整除,IsPrime()函数的返回值为False,x就不是素数。在Command1_Click事件过程中,通过调用函数判断是否为素数,只要出现一组数据满足条件,就停止For循环,这样可以保证是最小的素数。
转载请注明原文地址:https://kaotiyun.com/show/xdGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画1个文本框,名称为Textl(multiline属性为True),然后再添加三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读数”、“统计”和“存盘”,如图所示。程序的功能是:单击“读数”按钮,则把考生文
(1)在考生文件夹下有一个工程文件sjt3.vbp,含有两个窗体,名称分别为。ForTnl、Form2。其中,Forml上有两个控件(图像框和计时器)和一个菜单项“操作”,含有三个子菜单(如图l所示)。Form2上有一个,名称为Commandl、标题为“
命令按钮Commandl的事件过程如下:PrivateSubCommandl_Click()Dimarr(5,5)AsIntegerDimiAsInteger,jAsInteger
编写如下程序:PrivateSubCommandl_Click()DimiAsInteger,jAsIntegern=InputBox(“输入一个大于1的正整数”)Fori=2TonF
考生文件夹下的工程文件sjt5.vbp中有1个初始文本为空的文本框Textl,2个标题分别是“读数据”和“计算”的命令按钮;请添加1个标题为“各行最小数的平均值为”的标签Label2,再添加1个初始文本为空的文本框Text2,如图所示。程序功能如下:
将数据项“Student”添加到名称为Listl的列表框中,并使其成为列表框第一项的语句为()。
在名称为Framel的框架中,有两个名称分别为opl、op2的单选按钮,标题分别为“单程”、“往返”,如图所示。
设在当前目录下有一个名为“file.txt”的文本文件,其中有若干行文本。编写如下程序:PrivateSubCommandl_Click()Dimch$.asciiAsIntegerOpen“file.t
设窗体上有2个文本框Textl和Text2,并有下面的事件过程:DimnPrivateSubTextl—KeyPress(KeyAsciiAsInteger)lf“A”
随机试题
Infact,therewashardlyanyactivityorsocialeventthatcouldnotbesettoMusic.Weddings,births,christening,funerals,
某省人民政府要实施一项国家重点工程项目,占用某地区农民的土地。省人民政府对被用地的农民给予各种补偿费用与安置费,并对多余的劳动力进行了安置。省人民政府的此项行为属于( )。
编创打击乐声部伴奏。要求:(1)自选打击乐器,为谱例《红河谷》编配第Ⅱ、第Ⅲ声部件奏。(2)所编配的伴奏必须也是固定音型,节奏不能完全相同。
【2015.福建】在中国古代教育中形成了“六艺”教育。“六艺”是__________、乐、射、御、书、数。
党的十九大描绘了2035年基本建成法治国家、法治政府、法治社会的宏伟蓝图。在法治建设规划时,要贯彻中国特色社会主义法治理论,贯彻新发展理念,做到:
根据下面材料回答问题。以下是2006年农村实用人才现状:从区域分布看,我国东部地区231.4万人;中部地区201.7万人;西部地区145.9万人。从年龄分布看,40岁以下的247.9万人。从学历看,中专以上学历的22.7万人。农村实用人
Answerthequestionsbelow.ChooseNOMORETHANTHREEWORDSAND/ORANUMBERfromthepassageforeachanswer.Forabouthowlon
WhichofthefollowingstatementsisNOTcorrect?
Smokingisconsidereddangertothehealth.Ourtobaccoseller,Mr.Johnson,therefore,alwaysaskshiscustomers,iftheyarev
Infact,evenwithouthumans,theEarth’sclimatechanges.Someclimatechangeis【C1】______.But,asgreenhousegasesareadded
最新回复
(
0
)