全国等级考试资料网

2012年计算机二级VB考试试题及答案解析12

分类: 计算机  时间: 2019-01-17 18:57:39  作者: 全国等级考试资料网 

综合应用(1小题,计30分)

注意:下面出现的“考生文件夹”均为%USER%

在考生文件夹下有一个工程文件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列的矩阵形式显示出来, 然后交换矩阵第一行和第三行的数据, 并在窗体上输出交换后的矩阵,如图所示。在窗体的代码窗口中,已给出了部分程序,这个程序不完整,请把它补充完整,并能正确运行。

要求:

去掉程序中的注释符,把程序中的 ? 改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。 最后把修改后的文件按原文件名存盘。

解题思路:

启动Visual Basic系统,打开考生文件夹下需编辑的工程文件sjt5.vbp,相应的窗体文件名为sjt5.frm。

由于所提供的窗体程序不完整,在窗体的Private Sub Form_Click()事件过程中,有四处地方需要修改。

1) 将语句

’Dim ?

改为

Dim Mat(M, N) As Integer

2) 将语句

’Open App.Path & "" & "datain.txt" ? As #1

改为

Open App.Path & "" & "datain.txt" For Input As #1

3) 将语句

’?

改为

Input #1, Mat%(i, j)

4) 将语句

’?

改为

Mat%(3, j) = t

参考文件:c:wexam26990001hlpsys参考答案sjt5.vbp、sjt5.frm、sjt5.vbw

请把这些文件复制到c:wexam26990001中,然后打开sjt5.vbp文件并运行。

相关文章

猜你喜欢

精选计算机