Public Class Form1
    Inherits System.Windows.Forms.Form

    'Declare arrays
    Dim myArray(9) As Integer
    Dim myStrArray(2) As String
    Dim my2DArray(2, 2) As Double

    Private Sub Form1_Load(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles MyBase.Load

        Dim i, j As Integer

        'define arrays
        myStrArray(0) = "Apron"
        myStrArray(1) = "Tutorials"

        For i = 0 To 9
            myArray(i) = i
        Next i

        Dim count As Integer

        For i = 0 To 2
            For j = 0 To 2
                count = count + 1
                my2DArray(i, j) = 1.1 * count
            Next j
        Next i
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click

        Dim i, j As Integer

        'Display arrays
        TextBox1.Text = myStrArray(0) & " " & myStrArray(1)

        For i = 0 To 9
            TextBox2.Text = TextBox2.Text & myArray(i) & " "
        Next i

        For i = 0 To 2
            For j = 0 To 2
                TextBox3.Text = TextBox3.Text & my2DArray(i, j) & " "
            Next j
        Next i
    End Sub

End Class