首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
若两个素数a、b 之间没有其他素数,则称a、b为相邻的素数。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图1-322所示。从左到右的三个文本框名称分别为Text2、Text1、Text3;三个命令按钮的名称分别为Command1
若两个素数a、b 之间没有其他素数,则称a、b为相邻的素数。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图1-322所示。从左到右的三个文本框名称分别为Text2、Text1、Text3;三个命令按钮的名称分别为Command1
admin
2019-01-16
96
问题
若两个素数a、b 之间没有其他素数,则称a、b为相邻的素数。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图1-322所示。从左到右的三个文本框名称分别为Text2、Text1、Text3;三个命令按钮的名称分别为Command1、Command2、Command3。本程序的功能是:单击“读入数据”按钮,则从文件in5.dat中读入一个整数x放入Text1(中间的文本框)中;单击“找素数”按钮,则找出一对相邻素数使得满足以下条件:
a≤x
注意:不得修改原有程序和控件的属性。在 结束程序运行之前,必须单击“存盘”按钮,把结果存入out5.dat 文件,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口,编写对应的过程语句。 参考代码: Private Sub Command2_Click() Dim x1 As Integer, y As Integer x1 = Text1.Text y = x1 + 1 Do If isprime(y) = True Then Text3.Text = y Exit Do Else y = y + 1 End If Loop y = x1 - 1 Do If isprime(y) = True Then Text2.Text = y Exit Do Else y = y - 1 End If Loop End Sub 步骤2:运行程序,单击“读入数据”按钮,然后单击“找素数”按钮,则找出一对相邻素数a、b,最后单击“存盘”按钮。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/vuFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体上有1个名称为List1的列表框,程序运行时,如果选中了第3个列表项(最上面的列表项为第0个列表项),则下面不成立的是
设窗体上有一个Text1文本框和一个HScroll1水平滚动条,并有下面的事件过程:PrivateSubHScroll1_Change()Text1=HScroll1EndSub在程序运行时,当把滚动框移动
下面关于直线控件的叙述中正确的是
编写如下程序:PrivateSubCommand1_Click()DimxAsIntegerx=10Printfun1(x,12)+xEndSubPrivateFunctionfun1(mAsI
编写如下程序:PrivateSubCommand1_Click()DimnAsInteger,tAsLongStaticsAsIntegert=1Forn=1To3t=
在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写如下事件过程:PrivateSubCommand1_Click() x=0 DoWhilex
下面控件中,没有Caption属性的是( )。
有下面程序代码:PrivateSubCommand1_Click()a=Array(1,2,3,4,5,6,7,8,9,10)n=UBound(a)Fork=0ToUBound(a)
随机试题
结缕草、野牛草、羊胡子草都属于暖季型草
一般来说,相同建筑质量、相同功能和用途的建筑物价格,沿海开放城市【】内地城市。
卒然跌倒,不省人事,口角歪斜,半身不遂者为卒倒神昏,口吐涎沫,四肢抽搐,醒后如常者为
在建设铁路、工厂、水库、输油管道、输电线路和各种大型建筑物或者建筑群之前,建设单位必须向所在省、自治区、直辖市地质矿产主管部门了解拟建工程所在地区的矿产资源分布和开采情况。非经()批准,不得压覆重要矿床。
抵押与质押的区别主要在于( )。
在审计工作底稿三级复核制度下,部门经理应对工作底稿进行()。
某市人民政府通过发放意见表,设置意见箱,开设专门电子信箱和微博的方式,召开不同层面的座谈会和个别谈心的方式问计求策,广泛征集2016年为民办实事、办好事的意见和建议。这种做法是()。
下列各项不属于刑事司法工作的是()。
4635,3728,3225,2621,2219,()。
Whendoestheconversationprobablytakeplace?
最新回复
(
0
)