首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下: 1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。 2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下: 1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。 2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的
admin
2020-07-22
53
问题
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下:
1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。
2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的数组元素;若a数组元素的值能被2整除,则将该元素值的平方作为b数组同下标的元素;若a数组元素为其他值,则将该元素乘2的值作为b数组同下标的元素。
3)单击“查找最大值”按钮,则在b数组中找最大值并显示在Labe12标签上。
在给出的窗体文件中已经有了全部控件,标准模块中有判断素数的函数IsPrime。要求去掉程序中的注释符,把程序中的?改为正确的内容,并编写相应的程序,实现程序的功能。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,各命令按钮的事件过程必须至少各执行一次。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的工程文件sjt5.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。在“由考生编写”处补充正确代码。参考代码: Open App.Path&"\in5.txt"For Input As#1 Input #1,a(i,j) Private Sub Command2_Click() ’======以下由考生编写============ For i=1 To 5 For j=1 To 5 If sushu(a(i,j))=True Then b(i,j)=a(i,j) ElSe If a(i,j)Nod 2=0 Then b(i, j) =a(i, j) *a(i, j) Else b(i,j)=a(i,j)*2 End If End If Next i,j ’======考生编写程序结束============ End Sub Private Sub Command3 Click() ’======以下由考生编写============ Dim k As Long k=0 For i=1 To 5 For j=1 To 5 f b(i,j)>k Then k=b(i,j) Next;i,j Labe12.Caption=k ’======考生编写程序结束============ Open App.Path & "\out5.txt" For Output As #1 Print #1,Labe12.Caption Cl ose #1 End Sub 步骤2:按<F5>运行程序,单击各按钮测试验证。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/qHHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若在某窗体模块中有如下事件过程PrivateSubCommandl_Click(Integer)EndSub则以下叙述中正确的是
要将单选按钮Opt设为被选中,应设置的属性是
以下关于通用对话框的叙述中,错误的是
窗体的MouseUp事件过程如下:PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)……EndSub关于以上定义
若将变量TestDate声明为Date类型,则下列为变量TestDate赋值的语句中正确的是()。
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是
窗体上已有1个名称为Pieture1的图片框,要求实现下面2个功能之一:①在窗体上移动鼠标时,立即将Picture1显示在鼠标位置②在窗体上单击鼠标时,立即将Pieture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为( )。
在关系数据库中,用来表示实体间联系的是
将E-R图转换到关系模式时,实体与联系都可以表示成()。
随机试题
什么是讯问笔录?
青年,男性。因交通事故致左膝关节开放伤一小时就诊。X线示胫骨外侧平台斜型骨折,骨折线过髁间嵴,即入院急诊手术。清创时见污染较重,创口与关节腔相通,清创后,对骨折的处理
当测得CT值为0时,低于此数值的人体组织器官是
在职业性中毒中,生产性毒物主要通过下述哪种途径进入体内
胸膜摩擦感最明显的部位是
A.气虚B.血虚C.血热D.湿热E.血瘀患者,女,27岁,已婚。月经周期提前量多,色淡,质稀,神疲乏力,小腹空坠,纳少便溏。其证候是()
五年级学生小强,是班里一个活泼好动的男孩,在老师和同学的眼里,他是一个问题学生,性格外向,脑瓜很灵,特长众多,但他胆子大,脾气倔,纪律散漫,常闹事,对人傲慢无礼,没有好朋友,学习习惯不好,学习态度不端正,不肯踏实努力做事,故成绩平平。一面是见多识广的
SoonafterDaveleftuniversity,oneofhisuncles,whowas【C1】______andhadnochildrenofhisown,diedand【C2】______Davealo
三大战役的时间顺序是()。
Peopleindifferentpartsoftheworld______.Whendrinkingcoffee,manyAmericansliketo______.
最新回复
(
0
)