首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Text1的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Text1的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则
admin
2018-06-20
25
问题
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Text1的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。
请编写适当的事件过程,使得程序运行时,单击“计算”按钮,找出小于18000的最大素数,并显示在Text1中;单击“存盘”按钮,则将Text1中的计算结果存入考生文件夹下的out5.txt文件中。
注意:考生不得修改isprime函数过程和控件的属性,必须把计算结果通过“存盘”按钮存入out5.txt文件中,否则将没有成绩。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Function isprime(a As Integer)As Boolean Dim flag As Boolean flag=True b%=2 Do While b%<=Int(a/2)And flag If Int(a/b%)=a/b% Then flag=False Else b%=b%+1 End If Loop isprime=flag End Function 程序结束 Private Sub C1_Click() Dim i As nteger For j=17999To1Step-1 If isprime(i)Then Text1=i Exit For End If Next End Sub Private Sub C2_Click() Open App,Path&"\out5,txt"For Output As #1 Print#1,Text1.Text Close #1 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/eRy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Labell的标签;一个名称为Timerl的计时器,其Enabled和Interval属性分别为True和1000。编写如下程序:DimnAsIntegerPrivateSubTimerl_Timer()
设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是
设有如下程序:OptionBase0PrivateSubForm_Click()DimaDimiAsIntegera=Array(1,2,3,4,5
在考生目录下已有一个工程文件sjt5.vbp。运行程序后,分别从两个文件中读出数据,放入两个一维数组a、b中。请编写程序,当单击“合并数组”按钮时,将a、b数组中相同下标的数组元素的值求和,并将结果存入数组c。单击“找最大值"按钮时,调用find过程分别找
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Commandl的命令按钮,并有以下程序:PrivateSubCommand1_Click()
为了使标签中的内容居中显示,应把Alignment属性设置为()。
设有如下数组定义语句:Dimaa(一1T04,3)AsInteger以下叙述中正确的是()。
设有以下定义语句:PrivateTypepointxAsIntegeryAsIntegerEndTVpeDimaAspoint下面语句中正确的是
以下表达式与Int(3.5)的值相同的是
随机试题
李某是某城镇企业单位的职工,月工资为1800元,其每月应缴纳的失业保险费为()
A、七叶内酯B、七叶苷C、8-甲氧基香豆素D、东莨菪素E、5-羟基香豆素上述化合物以甲苯-甲酸乙酯-甲酸(4:5:1)为展开剂,进行硅胶薄层层析时,其Rf值大小是0.05、0.29、0.43、0.46
头颅CT平扫,窗位通常定在
建设用地批准后直至颁发土地使用权证书之前,应进行跟踪和管理,其主要任务是()。
现金短缺核查后原因不明,则应()。
华天公司为上市公司,适用企业所得税税率25%,所得税采用资产负债表债务法核算。2016年初“递延所得税资产”科目余额为320万元,其中:因上年职工教育经费超过税前扣除限额确认递延所得税资产20万元,因计提产品质量保证金确认递延所得税资产60万元,因未弥补的
某公司向客户供应的产品,使用中常有各种程度不同的质量问题发生,客户反映非常强烈,要求取消合同。公司决定请质量专家诊断。专家诊断认为问题的原因是在产品形成过程的质量控制中,未就产品质量特性对其适用性的影响进行分析。[2007年真题]公司对产品实行质量特性
下列不属于精神民俗的是()。
已知一算术表达式的中缀形式为A+B*C-D/E,后缀形式为ABC*+DE/-,其前缀形式为()。
在刑法将代替考试行为规定为犯罪后,在自学考试中请人替考的现象大幅度减少。这体现了刑法的何种机能()。
最新回复
(
0
)