Из данной действительной квадратной матрицы порядка 6х6 сформировать новую матрицу,увеличив в два раза значения ее элеме

Module Module1
    Public x(6, 6) As Double 'Твой массив 6 * 6
    Public n(6, 6) As Double 'Новый массив
    Sub Main()
        For c = 0 To 5 'Перебираем с нуля до x.GetLength(0) - 1, поскольку отсчёт массива начинается с нуля
            For f = 0 To 5 'Так же поступаем с x.GetLength(1) - 1
                x(c, f) = 4 'К примеру мы возьмём 4
                Console.Write(x(c, f).ToString + " ")
            Next
            Console.WriteLine()
        Next
        Console.WriteLine("-----------------")
        For c = 0 To 5
            x(c, c) *= 2 'Умножаем на два
            For f = 0 To 5
                Console.Write(x(c, f).ToString + " ")
            Next
            Console.WriteLine()
        Next
        Console.ReadKey() 'Мне было легче выводить на консоль, а ты можешь легко перевести на GUI
    End Sub
 
End Module

Module Module1
    Public x(6, 6) As Double 'Твой массив 6 * 6
    Public n(6, 6) As Double 'Новый массив
    Sub Main()
        For c = 0 To 5 'Перебираем с нуля до x.GetLength(0) - 1, поскольку отсчёт массива начинается с нуля
            For f = 0 To 5 'Так же поступаем с x.GetLength(1) - 1
                x(c, f) = 4 'К примеру мы возьмём 4
                Console.Write(x(c, f).ToString + " ")
            Next
            Console.WriteLine()
        Next
        Console.WriteLine("-----------------")
        For c = 0 To 5
            n(c, c) *= 2 'Умножаем на два
            For f = 0 To 5
                Console.Write(n(c, f).ToString + " ")
            Next
            Console.WriteLine()
        Next
        Console.ReadKey() 'Мне было легче выводить на консоль, а ты можешь легко перевести на GUI
    End Sub
 
End Module