Найти максимальный элемент каждой строки массива - VB

otvet=""
for i=0 to 10 'по всем строкам
  max=a(i,0)
  for j=1 to 5 'по всем столбцам
    if max<a(i,j) then max=a(i,j)
  next j
  otvet=otvet & max & vbcrlf
next i
msgbox otvet