首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
admin
2020-02-27
65
问题
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所示)。程序不完整,请在指定的位置把程序补充完整。
注意:不得修改原有程序和控件的属性。程序结束运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private arr(100) As Integer Public Function prime(x As Integer) k = Int(Sqr(x) + 5) For i = 2 To k If x Mod i = 0 Then prime = False Exit Function End If Next prime = True End Function Private Sub Command1_Click() Open App.Path & "\in5.txt" For Input As #1 For i = 1 To 40 Input #1, arr(i) Next Close #1 End Sub Private Sub Command2_Click() ’=====考生编写程序开始========== ’=====考生编写程序结束========== Open App.Path & "\out5.txt" For Output As #1 Print #1, Label3.Caption, Label4.Caption Close #1 End Sub 程序结束 参考答案 Dim a As Integer Dim b As Integer a = 0 b = arr(1) For i = 1 To 40 If prime(arr(i)) Then a = a + 1 Label3.Caption = a Next For i = 1 To 40 If prime(arr(i)) And arr(i) <= b Then b = arr(i) Label4.Caption = b Next 步骤3:按照题目要求调试并运行程序。 步骤4:关闭程序后,按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/zRTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerStaticzAsIntegerx
窗体上有名称为Command1的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()Text1.Text=”程序设计"Text1.SetFocusEndSubPrivateSubText1_GotFoc
支持子程序调用的数据结构是()。
窗体上有1个名称为Command1的命令按钮,能够使其向左移动100的语句是()。
现有语句:y=IIf(x>0,xMod3,0)设x=10,则y的值是()。
设二叉树中共有15个结点,其中的结点值互不相同。如果该二叉树的前序序列与中序序列相同,则该二叉树的深度为()。
对软件系统总体结构图,下面描述中错误的是()。
命令按钮Command1的MouseUp事件过程结构如下:PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)EndSub则
下面说法中正确的是()。
随机试题
“咖啡糖、蜘蛛网、录像机、研究所”四个词都是由三个语素构成的。
人体嘌呤核苷酸分解代谢的特征性终产物是
数控机床中的半闭环伺服系统与闭环伺服系统在结构上的主要区别是()。
对下列农业知识的掌握有误的一项是()。
用一夜读完的小说有一种是靠情节取胜,像《达.芬奇密码》。还有一种就是像《朗读者》,很难说它靠什么来吸引人需要用一夜读完,没有_______的情节设置,也没有_______的人物关系。填入画横线部分最恰当的一项是()。
除了吃川菜,张涛不吃其他菜肴。所有林村人都爱吃川菜。川菜的特色为麻辣香,其中有大量的干鲜辣椒、花椒、大蒜、姜、葱、香菜等调料。大部分吃川菜的人都喜好一边吃川菜,一边喝四川特有的盖碗茶。如果上述断定为真,则以下哪项一定为真?
下列Windows命令中,可以用于检测本机配置的DNS服务器是否工作正常的命令是()。
WhenRuthandElliotHandlerwereyoung,theyhadastrongdesireWhoownedMATTEL?
A=RotherhitheB=BarnesC=WillesdenD=King’sCrossWhichcity...usedtohavelotofproblemssuchasdrugs,streetcri
Readtheadvertisementbelowforahotdrinksmachine.Aresentences16-22"Right"or"Wrong"?Ifthereisnotenoughinformatio
最新回复
(
0
)