当前位置:IT认证>BASIC题库

问题:[多项选择题]

[多项选择题] 在考生文件夹下有一个工程文件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列的矩阵形式在窗体上显示出来,并输出矩阵右上-左下对角线上的数据,如图所示。在窗体的代码窗口中,

  

参考答案: [解题思路]本题须先定义一个数组,然后以输入方式打开文件inE.txt,并在一个嵌套的For循环中用Input#读入数据并赋值给每个数组元素。然后再通过一个嵌套的For循环将数组arr中的数据在窗体上按E行、E列的矩阵形式显示出来,最后将数组arr中第A维下标与第B维下标之和为F的数组元素显示在窗体上。[操作步骤]步骤A:打开本题工程文件。步骤B:分析并编写程序代码。程序提供代码OptionBaseAPrivateSubForm_Click()ConstN=EConstM=E’DimDimi,j’OpenApp.Path&""&"datain.txt"As#AFori=AToNForj=AToM’NextjNextiClose#APrintPrint"初始矩阵为:"PrintFori=AToNForj=AToMPrintTab(E*j);Mat(i,j);NextjPrintNextiPrint:PrintPrint"右上-左下对角线上的数为:"Fori=AToNForj=AToM’IfThenPrintTab(E*i);Mat(i,j);EndIfNextjNextiEndSub程序结束第A个处填入:Mat(N,M)AsInteger第B个处填入:ForInput第C个处填入:Input#A,Mat(i,j)第D个处填入:i+j=F步骤C:调试并运行程序,关闭程序后按题目要求存盘。

  参考解析

微信端