Дана матрица F(m*m)заменить нулями главную диагональ матрицы В С++ basic visual

В Visual Basic на форме нужно создать текстовое поле Label1 со свойством WordWrap = True, то есть многострочное поле,размер нужно задать, чтобы поместилась вся матрица.Sub MatrixDim F() As Integer ' Объявляем динамический массивDim m As Integer, i As Integer, k As Integer, t As String ' И переменныеm = InputBox ("Vvedite razmer matrix") ' Задаем размер массиваReDim F(m, m) ' Определяем размер массиваFor i = 1 To m    ' Ввод данных     For k = 1 To m         t = "Vvedite element Matrix" & Str(i) & "," & Str(k)         F(i, k) = InputBox (t)     Next kNext iFor i = 1 To m     F(i, i) = 0 ' Обнуляем элементы главной диагонали.Next iFor i = 1 To m     For k = 1 To m  ' Вывод строки данных через табуляцию         Label1.Caption = Label1.Caption & F(i, k) & Chr(9)      Next k     Label1.Caption = Label1.Caption & vbCrLf ' Переход на следующую строкуNext iEnd Sub