vb 面向过程程序设计的含义_vb程序设计教程答案_面向对象程序设计(16)

（6）将A矩阵两条对角线元素之和。

（7）将A矩阵按列的次序把各元素放入一位数组D中，显示结果。

8. 声明一个有20个元素的一维字符类型数组，要求：

（1）由随机数形成小写字母构成的数组，每个元素的字符个数由随机数产生，范围1~11。

（2）要求将生成的数组分四行显示。

（3）显示生成的字符数组中字符最多的元素。

9. 自定义一个职工类型，包含职工号、姓名和工资。声明一个职工类型的动态数组。输入n个职工的数据，

要求按工资递减的顺序排序，并显示排序的结果，每个职工一行显示三项信息。

1. （2）、（4）、（7）符合要求。

2. 数组名为a、数组类型为单精度，二维数组，各维的下界分别为-1和0、上界分别为2和3，数组的大小为4*4共16个元素，各元素排列顺序如下：

a(-1, 0) a(-1, 1) a(-1, 2) a(-1, 3)

a(0, 0) a(0, 1) a(0, 2) a(0, 3)

a(1, 0) a(1, 1) a(1, 2) a(1, 3)

a(2, 0) a(2, 1) a(2, 2) a(2, 3)

3. 静态数组在声明数组时的下标必须是常数，以后不能改变其大小；动态数组在Dim声明时不要声明数组的大小，在以后的程序中可以用ReDim语句重新声明数组的大小，ReDim语句中的下标可以出现有确定值的变量或表达式。

4. 已声明了的静态数组不能再用重定义语句来重新定义静态数组的大小。

5. 可以反复地改变数组的大小和数组的维数，但是不能改变数组的类型。

6. 在ReDim语句中加上了Preserve关键字，就只能重定义数组最后一维的大小，且根本不能改变数组

vb试题及答案83_vb答案

的维数。例如，如下语句：

Dim a（）

ReDim a（3，4）

ReDim Preserve a（4，5）

程序执行到ReDim Preserve a（4，5）时显示“下标越界”出错信息，也就是只能改变第二个下标的大小，而不能改变第一个下标的大小。

7. 利用随机数生成两个矩阵：

Dim a%(1 to 4, 1 to 4), b%(1 to 4, 1 to 4), c%(1 to 4, 1 to 4)

Private Sub Form_Click()

For i=1 to 4

For j=1 to 4

a(i,j)=int(rnd*41+30)

b(i,j)=int(rnd*35+101)

next j, i

End Sub

（1）将两个矩阵相加结果放入矩阵C中：

for i=1 to 4

for j=1 to 4

c(i,j)=a(i,j)+b(i,j)

next j, i

（2）将矩阵a转置：

for i=1 to 4

for j=1 to i-1

t=a(i,j): a(i,j)=a(j,i): a(j,i)=t

next j, i

（3）统计矩阵c最大值和下标：

dim max%, maxi%, maxj%

max=c(1,1): maxi=1: maxj=1

for i=1 to 4

for j=1 to 4

if c(i,j)>max then

max=c(i,j): maxi=i: maxj=j

end if

next j, i

（4）以下三角形式显示矩阵a、上三角形式显示矩阵b：

输出下三角元素：

for i=1 to 4

for j=1 to i

print a(i,j); space(4-len(a(i,j)));

next j

print

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-22730-16.html