Определить сумму элементов каждой строки матрицы, выяснить какая из сумм будет наименьшей - VB

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

Нужно рандомно задать матрицу MxN. Определить сумму элементов каждой строки, выяснить какая из сумм будет меньшой. Рандомно задать смогу, а вот, что делать дальше просто не знаю, помогите:

For i = 1 To m
For j = 1 To n
 a(i, j) = Int(Rnd(1) * 100)
 t = t & Str(a(i, j)) & "  "
Next j
Next i
TextBox1=t

Решение задачи: «Определить сумму элементов каждой строки матрицы, выяснить какая из сумм будет наименьшей»

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

                            '=============
  If S < Smin Then
    Smin = S
    minCount = i
  endif
Next i
                        

Оцени полезность:

9 голосов , оценка 4.111 из 5

Похожие ответы