在考生文件夹卜有一个工程文件sjt5．vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时，在文本框Text1中输入一个大于2的偶数，并单击“分解为”命令按钮，则可以将该偶数分解为两个素数之和，且要求其中一个素数是所能够分解出的最小的素数(一个偶数

admin2020-07-22 73

问题在考生文件夹卜有一个工程文件sjt5．vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时，在文本框Text1中输入一个大于2的偶数，并单击“分解为”命令按钮，则可以将该偶数分解为两个素数之和，且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合，例如24可以分解为5和19，也可以分解为11和13，要求取含有最小素数的组合，如图所示)。要求编写“分解为”命令按钮事件过程中“考牛编写程序开始”和“考生编写程序结束”之间的代码，以实现上述功能。过程IsPrime用来判断一个数是否为素数，如果是，返同值为True，否则返回值为False。
注意：不得修改原有程序和控件的属性。至少正确运行一次程序，且程序运行时在文本框中输入23456，单击“分解为”按钮，将结果显示在标签中，否则将没有成绩，最后将修改后的文件按原文件名存盘。

选项

答案步骤1：打开本题工程文件。步骤2：打开代码编辑窗口，在代码编辑窗口指定位置编写以下代码。 For i=1 To Val(Textl．Text)’i从1开始，第一个找到的肯定就是满足务件的最小素数 If IsPrime《i)And IsPrime(Val(Text1．Text)－i)Then’判定两个数是否都满足素数条件 Labe11=i Labe12=Val(Text1．Text)－i ExitFor End If Next i 步骤3：调试并运行程序，关闭程序后按题目要求存盘。

解析 Function IsPrime()函数用来判断一个数是否为素数，在处理循环变量的上限时，为了节约循环的次数，设置为Sqr(x)为x的平方根，如果x能被循环变量的值整除，IsPrime()函数的返回值为False，x就不是素数。在Command1—Click事件过程中，通过调用函数判断是否为素数。只要出现一组数据满足条件，就停止。For循环，这样可以保证是最小的素数。

转载请注明原文地址:https://kaotiyun.com/show/5VHp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

二级VB

NCRE全国计算机二级

窗体上有1个名称为Command1的命令按钮，事件过程如下：PrivateSubCommand1_Click()　　Dimx%，y%，z%　　x＝InputBox("请输入第1个整数")　　y＝InputBox("请输入第2个整数")

窗体上有一个名称为Text1的文本框，一个名称为Combo1的组合框。将文本框中的内容添加到组合框中所使用的命令是

下面正确使用动态数组的是(　　)。

以下关于过程及过程参数的描述中，错误的是()。

设已经在菜单编辑器中设计了弹出式菜单mnuStyle，要求程序运行时，当用户在文本框Text1上单击鼠标右键时，能够弹出该菜单，则应使用的事件过程是()。

下面不属于软件设计阶段任务的是

下列选项中，不属于数据管理员(DBA)职责的是()。

假定有以下循环结构：DoUntil条件表达式循环体Loop则以下正确的描述是()。

37岁女性患者，反复水肿1年，临床诊断为慢性肾小球肾炎，血压180／105mmHg，尿蛋白(+)，红细胞(++)，血肌酐：102μmol／L。血红蛋白105g／L。除饮食疗法外，目前该患者最主要的治疗措施应是

正常支气管呼吸音的听诊部位在

麦门冬汤原方中麦冬与半夏的配伍比例是()竹叶石膏汤原方中麦冬与半夏的配伍比例是()

患者，女性，40岁。由家人背送至急诊，家属诉半小时前发现其不省人事，倒卧在家中床上，时有呕吐。查体：皮肤多汗，流涎，双侧瞳孔明显缩小，呼吸有大蒜味，分诊护士首先考虑该患者最有可能为

某宗房地产购买总价为50万元，首付款为房价的30％，余款由银行贷款支付，该贷款的期限为10年，年利率为5．58％，按月等额偿还本息。则关于该房地产价格的说法中，正确的有()。

下列不符合中型电影院建筑基地条件的是()。

教学设计需要遵循的原则有系统性原则、程序性原则、()原则、反馈性原则．

就业歧视，是指用人单位没有合法依据，对未来潜在的就业人员自行作出各种限制性条款，从而排除了本该符合相关职位人员的平等就业权的一种现象。根据上述定义，下列属于就业歧视的是()

已知α1=[1，2，一3，1]T，α2=[5，一5，a，11]T，α3=[1，一3，6，3]T，α4=[2，一1，3，a]T．问：a为何值时，向量组α1，α2，α3，α4线性无关；

Indiatoppedalistofcountriesinitshopefulnessaboutretirement,accordingtoarecentreportbyHSBCofpeople’sexpectat

二级VB

NCRE全国计算机二级

窗体上有1个名称为Command1的命令按钮，事件过程如下：PrivateSubCommand1_Click() Dimx%，y%，z% x＝InputBox("请输入第1个整数") y＝InputBox("请输入第2个整数")

窗体上有一个名称为Text1的文本框，一个名称为Combo1的组合框。将文本框中的内容添加到组合框中所使用的命令是

下面正确使用动态数组的是( )。

以下关于过程及过程参数的描述中，错误的是()。

设已经在菜单编辑器中设计了弹出式菜单mnuStyle，要求程序运行时，当用户在文本框Text1上单击鼠标右键时，能够弹出该菜单，则应使用的事件过程是()。

下面不属于软件设计阶段任务的是

下列选项中，不属于数据管理员(DBA)职责的是()。

假定有以下循环结构：DoUntil条件表达式循环体Loop则以下正确的描述是()。

37岁女性患者，反复水肿1年，临床诊断为慢性肾小球肾炎，血压180／105mmHg，尿蛋白(+)，红细胞(++)，血肌酐：102μmol／L。血红蛋白105g／L。除饮食疗法外，目前该患者最主要的治疗措施应是

正常支气管呼吸音的听诊部位在

麦门冬汤原方中麦冬与半夏的配伍比例是()竹叶石膏汤原方中麦冬与半夏的配伍比例是()

患者，女性，40岁。由家人背送至急诊，家属诉半小时前发现其不省人事，倒卧在家中床上，时有呕吐。查体：皮肤多汗，流涎，双侧瞳孔明显缩小，呼吸有大蒜味，分诊护士首先考虑该患者最有可能为

某宗房地产购买总价为50万元，首付款为房价的30％，余款由银行贷款支付，该贷款的期限为10年，年利率为5．58％，按月等额偿还本息。则关于该房地产价格的说法中，正确的有()。

下列不符合中型电影院建筑基地条件的是()。

教学设计需要遵循的原则有系统性原则、程序性原则、()原则、反馈性原则．

就业歧视，是指用人单位没有合法依据，对未来潜在的就业人员自行作出各种限制性条款，从而排除了本该符合相关职位人员的平等就业权的一种现象。根据上述定义，下列属于就业歧视的是()

已知α1=[1，2，一3，1]T，α2=[5，一5，a，11]T，α3=[1，一3，6，3]T，α4=[2，一1，3，a]T．问：a为何值时，向量组α1，α2，α3，α4线性无关；

Indiatoppedalistofcountriesinitshopefulnessaboutretirement,accordingtoarecentreportbyHSBCofpeople’sexpectat

窗体上有1个名称为Command1的命令按钮，事件过程如下：PrivateSubCommand1_Click()　　Dimx%，y%，z%　　x＝InputBox("请输入第1个整数")　　y＝InputBox("请输入第2个整数")　

下面正确使用动态数组的是(　　)。