首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sit5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 32437658281298573 142536475869713243546576879805937 程序运行后
在考生文件夹下有一个工程文件sit5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 32437658281298573 142536475869713243546576879805937 程序运行后
admin
2020-02-27
27
问题
在考生文件夹下有一个工程文件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://jikaoti.com/ti/Lax0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下过程的功能是从数组中寻找最大值:PrivateSubFindMax(a()AsInteger,ByRefMaxAsInteger) DimsAsInteger,fAsInteger DimiAsInteger
设有如下的程序段:n=0Fori=1To3Forj=1ToiFork=jTo3n=n+1NextkNextjNexti执行上面的程序段后,n的
支持子程序调用的数据结构是()。
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下:32437658281298573142536475869713243546
设有如图所示窗体和以下程序:PrivateSubCommand1_Click()Text1.Text="VisualBasic"EndSubPrivateSubText1_LostFoeus()IfText1.Text<>"BAS
窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:PrivateSubText1_Change(IndexAsInteger)SelectCaseIndexCase0Text1(1).FontSize=Tex
在窗体上画一个名称为Dir1的目录列表框,一个名称为File1的文件列表框。当改变当前目录时,文件列表框中同步显示目录列表框中当前被打开目录中的文件,则所使用的事件过程是()。
在考生文件夹下有一个工程文件Sjt3.vbp,其窗体上有一个列表框和一个标题为“选择”的命令按钮,且列表框中已有若干列表项。程序的功能是:当单击”选择”按钮时,如果列表框中没有列表项,则程序不做任何操作。否则,判断列表框中是否有列表项被选中,如果没有,则自
某棵树中共有25个结点,且只有度为3的结点和叶子结点,其中叶子结点有7个,则该树中度为3的结点数为()。
在具有2n个结点的完全叉树中,叶子结点个数为()。
随机试题
关于SLE的关节病变,下列哪几项是正确的
半夏泻心汤的君药是
关于产褥期保健哪项是错误的
引起消化性溃疡的是
患者,男,21岁。患急性淋巴细胞性白血病,壮热口渴,头痛面赤,咽喉肿痛,时有鼻衄,便秘,舌红绛,苔黄,脉洪大,其证型是
关键事件法的缺点是()
西欧中世纪不属于家庭教育形式的是()。
下列哪些行为属于行政处罚?()
按照逻辑结构分类,结构可以分为线性结构和非线性结构,栈属于______。
TheTruthaboutLyingRickyGervais’snewfilm,TheInventionofLying,isaboutaworldwherelyingdoesn’texist,whichme
最新回复
(
0
)