Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim NUMEROS(9) As Integer
        Dim POSICION As Integer
        Dim RECORRIDO As Integer

        If POSICION <= 9 Then
            NUMEROS(POSICION) = Val(NUMERO.Text)
            Label5.Text = NUMEROS(POSICION)
            POSICION = POSICION + 1
        Else
            MsgBox("esta lleno")
        End If
    End Sub


End Class