Написать код на visual basic с кнопкой textbox

 Public Class Form1 
    Dim numbers(39) As Integer ' объявляем массив на 40 элементов 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
        Dim rand As New Random() ' создаем экземпляр класса Random для генерации случайных чисел 
        For i = 0 To 39 ' заполняем массив случайными двузначными числами 
            numbers(i) = rand.Next(10, 100) 
        Next 
        TextBox1.Clear() ' очищаем текстовое поле перед выводом чисел 
        For i = 39 To 0 Step -1 ' выводим числа на экран в обратном порядке по 6 чисел в строке 
            TextBox1.Text += numbers(i).ToString() + " " ' добавляем число в текстовое поле 
            If i Mod 6 = 0 Then ' если достигнут конец строки, добавляем символ перевода строки 
                TextBox1.Text += Environment.NewLine 
            End If 
        Next 
    End Sub 
End Class