首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 32 43 76 58 28 12 98 57 31 42 53 64 75 8
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 32 43 76 58 28 12 98 57 31 42 53 64 75 8
admin
2019-05-14
33
问题
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下:
32 43 76 58 28 12 98 57 31 42 53 64 75 86 97 13 24 35 46 57 68 79 80 59 37
程序运行后单击窗体,将把文件datain.txt中的数据输入二维数组Mat中,按5行5列的矩阵形式显示在窗体上,然后交换矩阵第二列和第四列的数据,将交换后的矩阵显示在窗体上,如图所示。在窗体的代码窗口中,已给出了部分程序,这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容(可以是多行),使其实现上述功能,但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考答案 Option Base 1 Private Sub Form_Click() Const N=5 Const M=5 Dim Mat(N,M) Aa Integer ’定义二维数组 Dim i,j,t Open App.Path &"\"&"datain.txt"For Input As #1 ’对文件进行读操作 For i=1 TO N For j=1 To M Input #1,Mat(i,j) ’将数据读入数组Mat中 Next j Next i Close #1 Print Print"初始矩阵为:" Print For i=1 To N For j=1 To M Print Tab(5 * j);Mat(i,j); Next j Print Next i For i=1 To N ’完成第二列和第四列的交换 t=Mat(i,2) Mat(i,2)=Mat(i,4) Mat(1,4)=t ’将t的内容赋给Mat(i,4),完成交换 Next i Print Print"交换第二列和第四列后的矩阵为:" Print For i=1 To N For j=1 To M Print Tab(5*j); Mat(i,j); ’将转换后的结果打印在窗体上 Next j Print Next i End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/5UUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列各种窗体事件中,不能由用户触发的事件是()。
设在工程中有一个标准模块,并定义了如下类型:TypeStutypeinoAsIntegerstmameAsString*20strsexAsString*2smarkAsSingle
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400、400;再画两个命令按钮,其名称分别为C1和C2,标题分别为“显示”和“扩大”,编写适当的
在考生文件夹下有一个工程文件sit5.vbp,窗体如图3.25所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果湿示在相应的文本框中。
在考生目录下有一个工程文件vbsj5.vbp,用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a2+b2=c2。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)。编写
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timerl的定时器,以及名称为Linel和Line2的两条水平直线。请用名称为Shapel的形状控件,在两条直线之间画一个宽和高都相等的形状,其显示形式为圆,并设置适当属性使其满足以下要求
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml、标题为“标签”的窗体上画一个名称为Labell的标签,并设置适当属性以满足以下要求:①标签的内容为“计算机等级考试”;②标签可根据显示内容自动调整
在考生目录下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此2数相乘,若乘积
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtT
(1)在名称为Forml的窗体上画一个名称为Ll的标签,标题为“口令”;画两个文本框,名称分别为Text1、Text2,都没有初始内容;再画三个命令按钮,名称分别为C1、C2、C3,标题分别为“显示口令”、“隐藏口令”、“复制口令”,在开始运行时,向Tex
随机试题
A.阿托品B.利多卡因C.人工心脏起搏D.普罗帕酮(心律平)E.普萘洛尔(心得安)对下列心律失常患者最佳的治疗选择是:男性,16岁。因心悸来急诊,心电图示预激综合征伴室上性心动过速,QRS宽0.13秒,
病案的法律作用包括
患者,女,26岁。二天来脐周腹痛,呈阵发性疼痛,且伴黑便,一周前曾进食虾蟹,此后全身散在有荨麻疹。查体:脐周皮肤及下肢可见紫癜,肝脾未及,肠鸣音亢进,大便潜血(+)。临床诊断最可能是()
图5-80所示圆截面杆,直径为d杆两端许可力偶矩为M0。若横截面面积增加1倍,许可力偶矩Mo为()。
某工程网络图如下,下列说法正确的是()。
保险代理机构对外投资、对外担保,可以用( )进行投资。
杨某2013年12月因无法偿还黄某的到期债务,遂将自己的一处房产作价300万元抵债给黄某,办理了相关的手续。黄某之后又将抵债所得的房产以310万元的价格出售。已知当地契税税率为4%。则下列说法正确的是()。
A、 B、 C、 D、 D第一个图加第二个图去同存异得到第三个图。
简述实施低成本战略的最佳时机和风险。
A、 B、 C、 A
最新回复
(
0
)