Ciao Aniello.
Prova con questo codice:
codice:
 Private tmr As Timer
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        tmr = New Timer
        AddHandler tmr.Tick, AddressOf tmr_tick
        tmr.Interval = 1000
        tmr.Enabled = True
        tmr.Start()
    End Sub

    Private Sub tmr_tick(sender As Object, e As EventArgs)
        'TODO: Codice di getione delle palline
    End Sub
Facci sapere....
Ciao