首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有2个标题分别是“读数据”和“查找质数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图3-36所示。 程序功能: (1)考生文件夹
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有2个标题分别是“读数据”和“查找质数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图3-36所示。 程序功能: (1)考生文件夹
admin
2020-02-27
63
问题
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有2个标题分别是“读数据”和“查找质数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图3-36所示。
程序功能:
(1)考生文件夹下in5.dat文件中存放着100个大于10的正整数。单击“读数据”按钮,则将in5.dat文件中的数据读入数组a中。
(2)单击“查找质数”按钮,则查找in5.dat文件中的所有质数,并将这些质数顺次显示在Text1文本框内。
“读数据”按钮的Click事件过程已给出,请编写函数prime,实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须使用“查找质数”按钮完成查找质数的过程,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
步骤1:打开考生文件夹中的工程文件sjt5.vbp,在窗体上添加以一个文本框,并按照表4-24设置相关属性。 [*] 步骤2:在代码编辑窗口中,补充prime函数。参考代码: Function prime(p As Integer) As Boolean ’考生编写 Dim flag As Boolean flag=True For m=2 To p/2 If p Mod m=0 Then flag=False Exit For End If Next m prime=flag End Function 步骤3:按
运行程序,单击各按钮测试验证。 步骤4:按要求将文件保存至考生文件夹中。
解析
题目要求设计判断某个数n是否素数的函数prime,方法是:看在2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。
转载请注明原文地址:https://kaotiyun.com/show/wHTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面不响应键盘事件的对象是
用LineInput语句从顺序文件读出数据时,每次读出一行数据。所谓一行是指遇到()分隔符,即认为一行的结束。
若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是( )。
下面是求最大公约数的函数的首部:Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是( )。
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性,该属性为
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可将考生文件夹下in3.txt文件中的所有英文单词读入,并在Text1文本框中显示;单击“插入列表框”按钮,则按顺序将每个单词作为一项添加到List1列表框中(如图所示)
表达式Int(-15.8)+Fix(-15.8)+Int(15.8)+Fix(15.8)的运算结果是()。
语句Dima(-3To4,3To6)AsInteger定义的数组的元素个数是( )。
某二叉树的前序遍历序列与中序遍历序列相同,均为ABCDEF,则后序遍历序列为()。
设:a=2,b=8,c=6,d=3,表达式a>bAndNot(c>d)Ord>c的值是
随机试题
Forthispart,youaresupposedtowriteane-mailinEnglishin100-120wordsbasedonthefollowingsituation.Remembertowri
男性,50岁。近几年来逐渐出现心悸、乏力、活动后气急。体检发现:心脏向左下扩大,心尖部有舒张期滚筒样杂音,主动脉听诊区闻及舒张期泼水样杂音。应选用的药物是
女,16岁,1月前因感冒咽喉疼痛,在地方诊所用青霉素治疗,症状好转3d后,上述症状“复发”,且伴全身肌肉酸痛,鼻梁侧出现红斑,口腔内有一溃疡,10d前出现咳嗽、发热,四肢疼痛,颜面红斑加重,呈蝶形样,边界清楚,双膝关节疼痛,行走困难,入院后确诊为系统性红斑
结肠癌标本病理提示肿瘤侵犯肠壁全层,结肠旁淋巴结有转移。全身无远处淋巴结及脏器转移,腹腔内无广泛转移灶。此病例Dukes分期属
40岁,已婚妇女,月经周期正常,经期延长,伴经量增多半年。现月经第5天量多来诊。检查:宫颈光,子宫后位,正常大小,活动,无压痛,附件(-),行诊断刮宫,以下哪项病理结果与临床表现符合
对项目的投资目标、进度目标和质量目标之间的关系,表述正确的是()
期货交易所不应该()。
征收土地增值税时应扣除的取得土地使用权支付的金额为()万元。征收土地增值税时应扣除的开发费用和其他项目金额为()万元。
公安行政复议申请提出后,受理的公安机关对申请复议的具体的行政行为进行()
What’stheattitudeofthespeaker?
最新回复
(
0
)