首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 32 43 76 58 28 12 98 57 31 42 53 64 75 86 97 13 24 35
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 32 43 76 58 28 12 98 57 31 42 53 64 75 86 97 13 24 35
admin
2016-06-23
31
问题
在考生文件夹下有一个工程文件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)As 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(i,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/TSLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在数据库设计中,将E-R图转换成关系数据模型的过程属于
有如下函数过程:FunctionFun(ByValxAsInteger,ByValyAsInteger)AsInteger DoWhileY<>0 reminder=xMody x=
声明一个变量为局部变量应该用
引用列表框(List1)最后一个数据项应使用
对长度为n的线性表进行顺序查找,在最坏情况下所需要的比较次数为
单击命令按钮时,下列程序的执行结果是PrivateSubCommand1_Click() BT4EndSubPrivateSubBT(xAsInteger) x=x*2+1 Ifx<6
下面叙述中不正确的是()。
在用通用对话框控件建立”打开”或”保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是()。
表达式x=Sqr(a^2-5)+sqr(b^2-5)的类型是
(1)在标题为“列表框”、名称为Form1的窗体上添加一个名称为List1的列表框,通过属性窗口输入4个列表项:“数学”、“语文”、“历史”、“地理”,列表项形式采用复选框形式,如图所示。列表框的宽为1100,高不限。注意:存盘时必须存放在考生文
随机试题
前方标志告知各个路口出口方向的信息。
下列国家中,采用半总统制的有()
与葡萄胎诊断不符的临床表现是()。
下列哪些电源可作为应急电源?()
有一无限长稍密中粗砂组成的边坡,坡角为25°,中粗砂内摩擦角为30°,有自坡顶的顺坡渗流时土坡安全系数与无渗流时土坡安全系数之比最接近下列哪个选项?
甲上市公司为增值税一般纳税人,适用的增值税税率为16%。2018年6月发生与职工薪酬有关的交易或事项如下:(1)对行政管理部门使用的设备进行日常维修,应付企业内部维修人员工资2.4万元。(2)对以经营租赁方式租入的生产线进行改良,应付企业内部改良工程人
弗洛伊德认为,个性是一个整体,由彼此相关的()构成。
教育法律体系
公安机关自觉地置于党委的领导之下,就是要积极主动地创造便于党委领导公安工作的条件,把接受党委的领导作为根本原则加以制度化,长期全面地贯彻执行。在这方面公安机关要做到()。
截至2018年底,中国人工智能市场规模约为238.2亿元,同比增长率达到56.6%。从中国人工智能企业地域分布情况来看,北京企业数量最多,企业数量为368家;其次为广东,人工智能企业数量为185家;排名第三的是上海,数量为131家。截至2017年底,
最新回复
(
0
)