首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下: 1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。 2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下: 1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。 2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的
admin
2020-02-27
58
问题
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下:
1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。
2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的数组元素;若a数组元素的值能被2整除,则将该元素值的平方作为b数组同下标的元素;若a数组元素为其他值,则将该元素乘2的值作为b数组同下标的元素。
3)单击“查找最大值”按钮,则在b数组中找最大值并显示在Label2标签上。
在给出的窗体文件中已经有了全部控件,标准模块中有判断素数的函数IsPrime。要求去掉程序中的注释符,把程序中的?改为正确的内容,并编写相应的程序,实现程序的功能。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,各命令按钮的事件过程必须至少各执行一次。
选项
答案
步骤1:打开考生文件夹中的工程文件sjr5.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 Erld 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 Label2.Caption=k ’=========考生编写程序结束============== Open App.Path & "\out5.txt" For Output.As #1 Print #1,Label2.Caption Close #1 End Sub 步骤2:按
运行程序,单击各按钮测试验证。 步骤3:按要求将文件保存至考生文件夹中。
解析
题目要求从文件中读取数据放到数组a当中,给数组a赋值通过嵌套的For循环来实现。“生成新数组”按钮的事件处理过程,按照规则来得到数组b,需要通过嵌套循环实现数组元素逐个赋值。同样,在查找最大值的时候通过嵌套的循环逐个搜索数组b的各个元素,就可以得到最大值。
转载请注明原文地址:https://kaotiyun.com/show/1TTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是()。
考生文件夹下有一个工程文件sjt5.vbp。运行程序后,从文件中读出数据,将其放入一个5×5的二维数组a中。请编写程序,找出数组a中每行的最大值及该值在行中的次序(列下标),并将所找到的结果分别保存到一维数组b、c中(a中第一行的最大值保存在b(1)中,最
(1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,通过设置参数使其形状为圆形;添加一个名称为Label1的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Text1的文本框,文本框最多能够显示5个字符,文
(1)在考生文件夹下有一个工程文件sjt3.vbp,包含了所有控件和部分程序。程序运行时,在文本框中每输入一个字符,则立即判断:若是小写字母,则将它的大写形式显示在标签Label1中;若是大写字母,则把它的小写形式显示在Label1中,若是其他字符,则将该
(1)在名称为Form1的窗体上添加一个名称为L1,标题为“业余爱好”的标签,再添加一个名称为Ch1的复选框数组,含3个复选框,它们的Index属性分别为0、1、2,标题依次为“体育”、“音乐”、“美术”,请设置复选框的属性,使其初始状态如下表所示。
对序线性表(23,29,34,55,60,70,78)用二分法查找值为60的元素时,需要比较次数为()。
假定变量X的值为33521397,则在声明其类型时不能声明为
下面不能在信息框中输出“VisualBasic”的是()。
VB中,若没有显式声明变量的数据类型,则默认的类型是()。
随机试题
在WindowsXP操作系统下,计算器可以在开始菜单上的程序列表中的()子菜单中打开。
重申社会准则的功能
成本加酬金合同的结果能够可靠地估计,应同时具备的条件为()。
项目经理在审计报告日后,准备将审计工作底稿归档,下列做法中,正确的有()。
道教的最高神是()。
启蒙运动是17、18世纪发生在欧洲的一场反封建、反教会的资产阶级思想文化解放运动,是继文艺复兴运动之后欧洲近代()思想解放运动。
从平面a外一点P引与a相交的直线,使得P点与交点的距离等于1,则满足条件的直线条数一定不可能是( )。
刑事案件中的陪审团不会依据任何证人所做的未经证实的证词而做出决定,这是十分正确的,因为对任何人所做的未经证实的指控保留高度怀疑是比较明智的。但为了一致,陪审团应该结束那种通行的做法,即依据未经完全证实的招供而给被告定罪。下面哪项,如果正确,最能增强
在特权模式下,输入()命令,就可以进入全局配置模式。
A、小学六年级B、初中一年级C、初中二年级D、高中二年级C第二段的后半部分提到“当国内读初二的时候,美国是小学八年级”,所以选择C。
最新回复
(
0
)