Определить сумму элементов каждой строки матрицы, выяснить какая из сумм будет наименьшей - 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

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

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

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


СОХРАНИТЬ ССЫЛКУ