Visual Basic¿ìËÙÈëÃÅ

Next j

Text1.Text = Text1.Text & vbCrLf

Next i

all = 0

For i = 2 To n - 1

For j = 2 To n - 1

all = all + a(i, j)

Next j

Next i

Text2 = \

ËùÓв»¿¿±ßÔªËØÖ®ºÍ

\

End Sub