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

CLS
RANDOMIZE TIMER
 
B = 5    ' ВВЕДИТЕ СВОЕ ЗНАЧЕНИЕ
 
DIM x(10, 3) AS LONG
DIM S(10) AS LONG
 
FOR i = 1 TO 10
FOR j = 1 TO 3
   x(i, j) = 18 * RND - 9
   PRINT x(i, j);
NEXT: PRINT
NEXT: PRINT
 
FOR i = 1 TO 10
FOR j = 1 TO 3
   S(i) = S(i) + x(i, j)
NEXT j, i
 
FOR i = 1 TO 10
   IF S(i) > B THEN PRINT "STROKA"; i; "SUM ="; S(i)
NEXT