首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sit5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 32437658281298573 142536475869713243546576879805937 程序运行后
在考生文件夹下有一个工程文件sit5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 32437658281298573 142536475869713243546576879805937 程序运行后
admin
2020-02-27
53
问题
在考生文件夹下有一个工程文件sit5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下:
32437658281298573 142536475869713243546576879805937
程序运行后单击窗体,将把文件datain.txt中的数据输入到二维数组Mat中,在窗体上按5行、5列的矩阵形式显示出来,然后交换矩阵第二列和第四列的数据,并在窗体上输出交换后的矩阵,如图3.72所示。在窗体的代码窗口中,已给出了部分程序,这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容(可以是多行),使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题对应工程文件sjt5.vbp。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Dim Mat(M,N)As Integer Open App.Path&“\”&”datain.txt”For Input As#1 Input#1,Mat(i,j) Mat(i,4)=t 步骤3:按要求将文件保存在考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/VxTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
阅读程序:PrivateSubForm_Click()DimxAsInteger,yAsIntegerX=32:y=42CallPCS(x,y)Printx;yEndSub
文本框接受的最长字符数由文本框的()属性确定。
设窗体中有一个文本框Text1,若在程序中执行了Text1.SetFocus,则触发()。
在程序运行时,下面的叙述中正确的是()。
语句Dima(-3To4,3To6)AsInteger定义的数组的元素个数是()。
下列叙述中正确的是()。
设有如图所示窗体和以下程序:PrivateSubCommand1_Click()Text1.Text="VisualBasic"EndSubPrivateSubText1_LostFoeus()IfText1.Text<>"BAS
假定通过复制、粘贴操作建立了一个命令按钮数组Command1,以下说法中错误的是()。
能够存放组合框的所有项目内容的属性是()。
在进行逻辑设计时,将E-R图中实体之间联系转换为关系数据库的()。
随机试题
需进行特殊口腔护理的患者有
男性,50岁,肺结核病史2年,近1周来出现咳嗽,咳痰,伴发热,体温38℃,入院时突然咯血300ml。既往曾有高血压病,对该患不适宜应用的止血药为
男性,55岁。咳嗽、痰血、体重减轻3个月。近2周出现声嘶就诊。痰脱落细胞阳性,纤维支气管镜见右肺上叶支气管口新生物致管腔完全阻塞。随病情进展肿块增大,患者出现新的神经压迫,最可能是
路面渗透系数测试应()。
具备条件的快件运营人可以通过( )申请办理报检。
原甲公司业务员张某在火车上遇到与甲公司有长期业务关系的乙厂经理陈某,闲聊中张某得知乙厂正准备进行技术改造,需购置一台精密仪表。张某表示甲公司有这方面的业务关系,可以代为采购。双方达成协议。乙厂按规定时间向甲公司寄去预付款10万元人民币。但到合同约定的交货日
个体身心发展的()给我们的启示是,教育工作必须从学生的实际出发,针对不同年龄段的学生,提出不同的具体任务,采取不同的教育内容和方法,同时应注意前后相邻阶段的衔接。
USTR
Severaldaysago,Icameacrossastrangerinthestreetwhostoppedandaskedmedirections.I【C1】________toshowhimtheway
Whatisyourfavoritecolor?Doyoulikeyellow,orange,andred?Ifyoudo,youmustbeanoptimist,anactivepersonwhoenjoy
最新回复
(
0
)