Ввести двумерный массив с помощью генератора случайных чисел - VB

Формулировка задачи:

РЕБЯТ!!!!! ввести двумерный массив 5*5 с помощью генератора случайных чисел. диапозон от -50 до 50. вывести на форму матрицу и сумму элементов обратной диагонали матрицы.!! помогите пожалуйста срочно. я брюнеткано в инфе по нулям)))

Решение задачи: «Ввести двумерный массив с помощью генератора случайных чисел»

textual
                            Листинг программы 
                        

                            Sub Matrix_5x5()
Dim arr(1 To 5, 1 To 5) As Integer, i As Integer, j As Integer, iSum As Integer, sStr As String
For i = 1 To 5
    For j = 1 To 5
        arr(i, j) = Int(101 * Rnd - 50)
        sStr = sStr & arr(i, j) & Space(3)
    Next
    sStr = sStr & vbNewLine
    iSum = iSum + arr(i, 6 - i)
Next
Label1.Caption = sStr
Label2.Caption = iSum
End Sub
                        