首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
注意:下面出现的“考生文件夹”均为C:\wexam\25160002。 在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 86 97 13 24 35
注意:下面出现的“考生文件夹”均为C:\wexam\25160002。 在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下: 86 97 13 24 35
admin
2009-02-25
26
问题
注意:下面出现的“考生文件夹”均为C:\wexam\25160002。
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下:
86 97 13 24 35 46 57 68 79 80 59 37 32 43 76 58 28 12 98 57 31 42 53 64 75
程序运行后,单击窗体,将把文件datain.txt中的数据输入到二维数组Mat中,在窗体上按5行5列的矩阵形式显示出来,然后计算矩阵第三行各项的和,并在窗体上显示出来,如图25-5所示。在窗体的代码窗口中,已给出了部分程序,这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
选项
答案
程序首先应该打开文件(使用只读方式打开文件),然后将文件中的数据存放到Mat数组中。程序中使用了Option Base1语句,则数组每一维的下标都从1开始,把二维数组行标为3的所以元素相加,所求得的和就是矩阵第三行各项的和。 解题步骤: 第一步:;建立控件并设置属性值。 本题不需要设置。 第二步:编写程序代码。 程序提供的代码: Option Base 1 Private Sub Form_Click() Const N=5 Const M=5 ’Dim ? Dim Sum, i, j ’Open App.Path & "\" & "datain.txt" ? As #1 For i=1 To N For j=1 To M ’? 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 ’Sum=? For j=1 To M ’? Next j Print Print "第三行各项的和为;"; Print Sum End Sub 参考代码: Option Base 1 Private Sub Form_Click() Const N=5 Const M=5 Dim Mat (5, 5) Dim Sum, i, j Open App.Path & "\" & "datain.txt" For Input As #1 For i=1 To N For j=1 To M Input #1, Mat(i, j) 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 Sum=0 For j=1 To M Sum=Sum + Mat (3, j) Next j Print Print "~--~T~I~$~: ,,., Print Sum End Sub 第三步:调试并运行程序。 第四步:按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/th1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
软件危机爆发之后,荷兰科学家Bijkstra1968年提出了一种新的程序设计思想,它就是()。
定义一个表示10个值为null的字符串数组、下面选项正确的是
下面语句会产生编译错误的是
下面的程序用“冒泡”法将数组a中的10个整数按升序排列,请在横线处将程序补充完整。publicclassSun{publicstaticvoidmain(Stringargs[]){int[]a={67
创建一个10行40列的文本区域tal的正确语句是【】。
ODL转换关系时,若为原子类型属性,类的每个属性对应关系的一个属性;若为结构类型,其每个元素为关系的一个属性;若为数组,则按元素的个数即可扩展为______,也可扩展为多个属性。
下面的表达式中正确的是()
下面说法不正确的是()
下面ChangeTitle()中对b1和b2按钮构造监听器,实现当单击b1按钮时标题变为students,当单击b2按钮时标题变为teachers。请将程序补充完整。publicChangeTitle(){super("Title
创建一个显示“选项”的菜单项对象mi的正确语句是【13】。
随机试题
设总体X的概率分布为利用来自总体的样本值1,3,2,2,1,3,1,2,可得θ的最大似然估计值为().
蔡元培率先引入中国的一词是()
Don’tloseheart!Youshould______yourcourageandovercomethedifficulty.
启动外源性凝血途径的物质是()
根据新的《中华人民共和国公司法》的规定,监事会、不设监事会的公司监事行使的职权不包括()。
账簿中书写的文字和数字上面要留有适当空间,不要写满格,一般应占格距的三分之一。()
造就全面发展的人的途径和方法是()
公有制经济包括国有经济和集体经济。()
出个门,还要如此这般__________,不明__________的人,恐怕要笑话了。然而这风格放在梁在秀身上,却也正是人事相宜。搞了大半辈子形而上的哲学,所奉守的,不外“真我”二字。他既要真我无亏,行起事儿来,一举一动便都不能__________。填入划
试述新航路开辟的历史背景及影响。(南京大学1998年世界古代中世纪史真题)
最新回复
(
0
)