VB矩阵对角线元素对换是个数组与过程调用结合的问题，实在不知道如何使用过程进行编程，题目要求：将一个5*5矩阵的两个对角线元素的位置对调。矩阵元素的值是10～30之间的随机整数。

Question

VB 矩阵对角线元素对换是个数组与过程调用结合的问题，实在不知道如何使用过程进行编程，题目要求：将一个5*5矩阵的两个对角线元素的位置对调。矩阵元素的值是10～30之间的随机整数。应该是用一个数组存放对角线元素再进行交换吧，不知道思路对不对。求教啊！能把整个程序放上来最好哦！

Answer 1

Private Sub Command1_Click() Dim i As Integer Dim j As Integer Dim s(5, 5) As Integer Dim k As Integer Dim l As String For i = 1 To 5 For j = 1 To 5 s(i, j) = Int(Rnd() * 30 + 10) l = l & s(i, j) ...