首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 32437658281298573142536475869713243546576879805937 程序运行后单
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 32437658281298573142536475869713243546576879805937 程序运行后单
admin
2017-03-27
35
问题
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下:
32437658281298573142536475869713243546576879805937
程序运行后单击窗体,将把文件datain.txt中的数据输入到二维数组Mat中,在窗体上按5行、5列的矩阵形式显示出来,然后交换矩阵第二列和第四列的数据,并在窗体上输出交换后的矩阵,如图3—126所示。在窗体的代码窗口中,已给出了部分程序,这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容(可以是多行),使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开本题对应工程文件sjt5.vbp。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Dim Mat(M,N)As Integer Open App.Path&"\"&"datain.txt"For Input As#1 nput#1,Mat(i,j) Mat(i,4)=t 步骤3:按要求将文件保存在考生文件夹中。
解析
本题源程序的大致设计思路是:程序运行后单击窗体,则打开数据文件datain.txt并从中读取数据,并依次存入二维数组Mat(下界为1,上界为5)的各元素中,故第一个?处是定义数组,应改为:Mat(M,N)As Integer;第二个?处是指明打开文件的方式,应改为:For Input;第三个?处是将数据文件中的数据读入并赋值给数组元素,应改为:Input#1,Mat(i,i);然后用一个嵌套的For循环将数组Mat中的数据在窗体上按5行、5列的矩阵形式显示出来,接着再用一个For循环将数组Mat中第2维下标为2和第2维下标为4的元素对应(即第1维下标一致)交换值,交换值时引入一个中间变量t,故第4个?处是将中间变量t的值赋给数组元素Mat(i,4),应改为:Mat(i,4)=t。最后将交换后的数组Mat中的数据,再按5行、5列的矩阵形式在窗体上显示出来。
转载请注明原文地址:https://kaotiyun.com/show/KmGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
属性窗口分为4个部分,这4个部分分别是______。
测试的目的是暴露错误,评价程序的可靠性;而【】的目的是发现错误的位置并改正错误。
在VisualBasic中按文件的编码方式不同,可将文件分为
下列程序段的执行结果为______。X=2Y=1IfX*Y<1ThenY=Y-1ElseY=-1PrintY-X>0
改变驱动器列表框的Drive属性值将激活______事件。
假定有一个菜单项,名为Menultem,为了在运行时使该菜单项失效(变灰),应使用的语句为
对建立良好的程序设计风格,下面描述正确的是______。
属性窗口分为4个部分,这4个部分分别是______。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Forn=1T020IfnMod3
随机试题
在射线检验的胶片上,焊缝夹渣的特征图像是()。
灭火器日常检查中,发现灭火器达到维修条件或维修期限时,建筑使用管理单位应及时按照规定程序送修。()的灭火器应及时送修。
从外单位取得的原始凭证如有遗失,除火车、轮船、飞机票等凭证外,应当取得原开出单位盖有公章的证明,并注明原凭证的号码、金额、内容等,经经办单位会计机构负责人、会计主管人员和单位负责人的批准后才能代作原始凭证。()(4.2)
经上级有关部门批准的经济业务,应将批准文件作为原始凭证附件。()
某企业出售房屋一幢,账面原价500000元,已提折旧140000元,出售时发生清理费用600元,出售价款为420000元,适用营业税税率为5%。企业结转出售固定资产净损益时的会计分录为()。
某电子公司(企业所得税税率15%)2017年1月1日向母公司(企业所得税税率25%)借入2年期贷款5000万元用于购置原材料,约定年利率为10%,银行同期同类贷款利率为7%。2017年电子公司企业所得税前可扣除的该笔借款的利息费用为()万元。
效度具有相对性,因此,在评鉴测验的效度时,必须考虑测验的()。
根据下述材料,回答下列题。某研究者采用父母教养方式评价量表(EMBU)和学习动机量表调查了180名初中一年级学生。该研究者计算出每名学生在父母教养方式评价量表的9个维度上的得分并根据每名学生在9个维度上得分状况确定他们的家庭教养方式类型(专制型、
下述程序段功能为将首地址为FIRST的字符串送到首地址为SECOND的内存区。 请用一条指令填空。 CID LEA SI, FIRST LFA DI, ES:SECOND
Theimagewasfascinating,asjusticeJohnPaulStevens,aChicagonative,presentedit.Agangmemberandhisfatherarehangin
最新回复
(
0
)