Двухмерный массив,написать процедуру

[dosha]

есль я понял то над найти всех сумму jтых элементов массива A(i,j)

[Withoutmf]

Sub vvodMatr(ByRef a(,) As Integer, ByVal index As Integer)
Dim i, j As Integer
Dim r1, r2 As String
Dim y As String
Select Case index
Case 0
For i = 0 To 2
For j = 0 To 2
a (i, j) = CInt (Rnd (1) * 100 - 50 )
Next
Next
Case 1
For i = 0 To 2
For j = 0 To 2
r1 = Str (i) : r2 = Str (j)
y = InputBox("эл-т массива а (" + r1 + "," + r2 + ")=", _
"Ввод значений эл-тов массива А()")
a(i, j) = Val(y)
Next
Ну вот это с моей лабы я перекатал,но эта лаба сделана с числами и т.д..,там мой вариант специальный,а задача тупо с 2 переменными i and j я так понимаю,ну вот мне нужно как-то это преобразовать,чтобы решилась задача,То,что задача по этому типу и по этой лабе,это 100%.
Прошу,помогите)!!

[Kingdom_Reborn]

язык выяснили, теперь условие надо

[Withoutmf]

Блин,пацаны,дайте ктонибудь свое мыло,я вам на мыло скину методичку с лабой,просто я НУ НИЧЕГО НЕ ПОНИМАЙ,честно,если бы я хоть в чем то здесь разбирался ,я бы сам сделал,но тут проблем страшная!

[dosha]

короч не мучайся стучи в асю(ася есть в профиле)

[Withoutmf]

Сообщение от dosha

короч не мучайся стучи в асю(ася есть в профиле)

спасибо!)
ща..

[Withoutmf]

Сообщение от Kingdom_Reborn

язык выяснили, теперь условие надо

Что за язык!?
ПОДСКАЖИ!((

[Kingdom_Reborn]

Сообщение от Withoutmf

Что за язык!?
ПОДСКАЖИ!((

Visual Basic

[dosha]

итак, пацаны язык я выяснил - это делфи. а вот с заданием при внимательном просмотре выяснить не могу