首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下: 1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。 2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下: 1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。 2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的
admin
2020-02-27
73
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:OptionBase1PrivateSubCommand1_Click()Dim
以下关于函数过程的叙述中,正确的是()。
下列关于栈的叙述正确的是()。
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标签L1和L2,标题分别为“口令”和“允许次数”;一个命令按钮C1,标题为“确定”;两个文本框名称分别为Text1和Text2。其中Text1用来输入口令(输入时,文本框内容显示“*”),初始内容
(1)在考生文件夹下有一个工程文件sjt3.vbp,包含了所有控件和部分程序。程序运行时,在文本框中每输入一个字符,则立即判断:若是小写字母,则将它的大写形式显示在标签Label1中;若是大写字母,则把它的小写形式显示在Label1中,若是其他字符,则将该
下面不属于软件设计阶段任务的是
在窗体上画2个文本框(名称分别为Text1和Text2),一个命令按钮(名称为Command1)。并定义以下记录类型和变量:PrivateTypeTeacherIDAsIntegerNameAsString*10En
表达式Int(-15.8)+Fix(-15.8)+Int(15.8)+Fix(15.8)的运算结果是()。
已知:x=-6y=39则表达式"y\x*Sgn(x)"的值为( )。
VB中,若没有显式声明变量的数据类型,则默认的类型是()。
随机试题
桂枝治“胸痹疼痛”是因为
A.相须B.相使C.相畏D.相恶E.相反天南星配生姜属
田某认为区人社局记载有关他的社会保障信息有误,要求更正,该局拒绝。田某向法院起诉。下列哪些说法是正确的?
建筑工程方案招标评标结束后,建筑主管部门应对中标方案、评标专家及各位专家意见进行公示,公示期为()。
资本作为货币的一种转换形式,在许多情况下是在()中运作的。
A工作的紧后工作为B,C,A、B、C工作持续时间分别为6天、5天、5天,A工作最早开始时间为8天,B,C工作最迟完成时间分别为25天、22天,则A工作的总时差应为()。
新建并以“1月货币资金表.srp”为名称保存在考生文件夹下。
ABC会计师事务所的A注册会计师负责审计甲公司2017年度财务报表。审计工作底稿中与函证相关的部分内容摘录如下:(4)因未收到应收丙公司款项的询证函回函,A注册会计师将检查期后收款作为替代审计程序,查看了应收丙公司款项明细账的期后贷方发生额,结果
已知随机变量X的概率分布P(X=k)=,其中λ>0,k=1,2,…,则E(X)为()。
Whatinformationdidthemanhearfromthebroadcast?
最新回复
(
0
)