首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp。运行程序后,单击“读数据”按钮,从data5.dat文件中读出一个数据,并显示在标签Label1中;单击“找素数”按钮,则在大于Label1的数据范围内找出最小的素数,并将其显示在标签Label2中。 在给出的窗
在考生目录下有一个工程文件sjt5.vbp。运行程序后,单击“读数据”按钮,从data5.dat文件中读出一个数据,并显示在标签Label1中;单击“找素数”按钮,则在大于Label1的数据范围内找出最小的素数,并将其显示在标签Label2中。 在给出的窗
admin
2017-03-26
39
问题
在考生目录下有一个工程文件sjt5.vbp。运行程序后,单击“读数据”按钮,从data5.dat文件中读出一个数据,并显示在标签Label1中;单击“找素数”按钮,则在大于Label1的数据范围内找出最小的素数,并将其显示在标签Label2中。
在给出的窗体文件中已经有了全部控件,并给出了读写文件和判断素数的程序代码。但程序不完整。
要求:去掉程序中的注释符,把程序中的“?”改为正确的内容,并编写相应程序段,实现程序功能。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,各命令按钮的事件过程必须至少各执行一次。
选项
答案
步骤1:打开考生文件夹中的工程文件sjt5.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: [*] 步骤2:按<F5>键运行程序,单击各个按钮测试验证。 步骤3:按要求将文件保存至考生文件夹中。
解析
题目要求找出大于某个值的最小素数,可以是While循环或者Do While循环。循环变量n的起始条件是标签1的值+1,存循环体内部循环变量增加1,循环结束条件是p(n)返回值不会False。
第一个“?”处是把从文件里面读出来的x值显示在标签上,第=个“?”处是关闭打开的文件。
转载请注明原文地址:https://kaotiyun.com/show/RmGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设x=4,y=6,则以下不能在窗体上显示出“a=10”的语句是______。
在窗体上画1个名为Text1的文本框和1个名为Label1的标签,再画4个名为Op1的单选按钮控件数组,其Index属性按季度顺序为0~3,如图1所示。在文件Sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时,鼠标单击一个单选按
下列每组控件中,都包含有滚动条的一组控件是
为了使模块尽可能独立,要求
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:OptionBase0PrivateSubCommand1_Click()DimcityAsVariant
改变驱动器列表框的Drive属性值将激活______事件。
对变量名说法不正确的是______。
在正确安装VisualBasic6.0后,可以通过多种方式启动VisualBasic6.0。以下方式中,不能启动VisualBasic6.0的是()。
以下合法的VisualBasic标识符是
在软件生命周期中,能准确确定软件系统必须做什么和必须具备哪些功能的阶段是
随机试题
A.大汗淋漓,四肢厥冷,面色苍白,神情淡漠,呼吸微弱,脉微欲绝B.经常畏冷,四肢不温,渴喜热饮,常自汗出,尿清便溏,脉迟无力C.身热大汗,汗热质粘,面色潮红,躁扰不安,渴喜冷饮,脉细疾数D.高热肢厥,神识昏沉,胸腹灼热,口渴喜饮,面色紫暗,脉沉有力
为二氢叶酸还原酶抑制剂的抗疟药物是
因保险合同引起的纠纷,下列哪些人民法院有管辖权?
根据《建设工程项目管理规范》GB/T50326-2006,项目经理的权限包括()。
新起用账簿应缴纳印花税为( )元。运输合同应缴纳印花税为( )元。
行政赔偿的方式有支付赔偿金、恢复名誉、返还财产和()。
社会收缩是指人类聚落中人口持续流失,由此引发相应地区经济社会环境和文化在空间上的衰退。根据收缩行为是否是聚落行为主体主动采取的规划策略或管理措施,可以分为主动社会收缩和被动社会收缩。根据上述定义,下列选项属于主动社会收缩的是:
以下数组定义语句中,错误的是( )。
Inademocraticsocietycitizensareencouragedtoformtheirownopinionsoncandidatesforpublicoffices,taxes,constitution
DearMissLi,IherebyconfirmthatyouhavebeenacceptedbytheVirginiaUniversitytostudymedicine.Yourcoursewillcom
最新回复
(
0
)