首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件vbsj5.vbp。运行程序时,在文本框中输入一个素数,然后单击“查找”命令按钮,找出小于给定素数的三个最大的素数,并显示在标签控件数组lblResult 中,如图1-246所示。 要求:工程文件中已给出部分程序,其中
在考生文件夹下有一个工程文件vbsj5.vbp。运行程序时,在文本框中输入一个素数,然后单击“查找”命令按钮,找出小于给定素数的三个最大的素数,并显示在标签控件数组lblResult 中,如图1-246所示。 要求:工程文件中已给出部分程序,其中
admin
2018-12-05
68
问题
在考生文件夹下有一个工程文件vbsj5.vbp。运行程序时,在文本框中输入一个素数,然后单击“查找”命令按钮,找出小于给定素数的三个最大的素数,并显示在标签控件数组lblResult 中,如图1-246所示。
要求:工程文件中已给出部分程序,其中的IsPrime过程用来判断一个数是否为素数。请编写“查找”命令按钮的事件过程中的部分程序代码。
注意:程序调试通过后,在“给定的素数”对应的文本框中输入12379,并执行“查找”命令,将找到满足条件的三个素数显示在标签中,否则没有成绩。不得修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
程序源码:
Private Function IsPrime(ByVal x
As _
Integer) As Boolean
Dim i As Integer
For i = 2 To Sqr(x)
If x Mod i = 0 Then
IsPrime = False
Exit Function
End If
Next
IsPrime=True
End Function
Private Sub cmdFind_Click()
’考生编写程序开始================
’考生编写程序结束================
Open App.Path & "\out5.dat" For
_
Output
As # 1
Print#1,txtInput.Text,
lblResult(0). _
Caption,
lblResult(1).Caption, _
lblResult(2).Caption
Close #1
End Sub
选项
答案
【操作步骤】 步骤1:打开本题对应工程文件vbsj5.vbp。 步骤2:双击窗体Form1上的“计算”按钮,打开代码编辑窗口,在其Click事件过程中输入如下代码: 参考代码: Dim j As Integer Dim n As Integer n = Val(txtInput.Text) - 1 For j = 0 To 2 While Not IsPrime(n) n = n - 1 Wend lblResult(j).Caption = n n = n - 1 Next 步骤3:运行程序,在“给定的素数”对应的文本框中输入12379,并执行“查找”命令,将找到满足条件的三个素数显示在标签中,然后单击关闭按钮结束程序的运行。 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/ptFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设变量x的值是845,则下面语句的输出是()。Printx\100+(xMod100)\10+xMod10
现有如下程序:PrivateSubCommand1_Click() s=0 Fori=1To5 s=s+f(5+i) Next PrintsEndSubPublicFunctionf(xAsInteger
命令按钮Command1的事件过程如下:PrivateSubCommand1_Click() Dimarr(5,5)AsInteger DimiAsInteger,jAsInteger Fori=1To4
下面能够将某个变量声明为局部变量的是
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
语句Dima(-3To4,3To6)AsInteger定义的数组的元素个数是( )。
下面不能作为结构化方法软件需求分析工具的是()。
下列循环中,可以正常结束的是( )。
结构化程序设计中,下面对goto语句使用描述正确的是
程序流程图中带有箭头的线段表示的是
随机试题
患者,女,68岁,因哮喘急性发作就医。医师处方:雾化吸入沙丁胺醇、异丙托溴铵、布地奈德混悬液,同时静脉注射氨茶碱、氢化可的松琥珀酸钠。患者用药后3h出现骨骼肌震颤。实验室检查:血钾2.7mmol/L(正常参考范围3.5~5.5mmol/L)。引起患者不良反
三部门经济中,总需求的表达式为()
A、3个B、5个C、6个D、1个E、50个镜下血尿是指显微镜下每高倍视野红细胞计数超过
如果当前的证券价格反映了历史价格信息和所有公开的价格信息,则该市场属于()。
以一笔款项购入多项没有单独标价的固定资产,应当按照各项固定资产的账面价值比例对总成本进行分配,分别确定各项固定资产的成本。()
下列关于专门决策预算的表述中,不正确的是()。
“闪婚”是指男女双方恋爱不到半年就结婚。某研究机构对某市法院审理的所有离婚案件作了调查。结果显示,闪婚夫妻3年内起诉离婚的比例远远高于非闪婚夫妻。由些,该研究机构认为闪婚是目前夫妻离婚的一个重要原因。下列哪项如果为真,最能削弱以上论证?
下列说法中,正确的有()。Ⅰ.清除内存、设置时钟都是特权指令,只能在内核态(系统态、管态)下执行Ⅱ.用零作除数将产生中断Ⅲ.用户态到内核态的转换是由硬件完成的Ⅳ.在中断发生后,进入中断处理的程序可能是操作系统程序,也可能是应用程序
BestChoiceRecruitmentAgencyVacancyRegistrationFormCOMPANYNAME:HopeVACANCYTITLE:【A1】______
A、Jefferson’sviewsaboutcommercializedagriculture.B、Internationaltradeinthenineteenthcentury.C、Improvementsinfarmma
最新回复
(
0
)