Debugging AutoSpammer

Ok i have an autospammer, and it doesnt wanna do what i want it to do. it either continues to send, or it freakin shows the message box continuosly...

VB Code:

MsgBox("You have approx 2.5 seconds till we start spamming. HURRY!")
        Wait(2500, 100)
        Dim i As Integer
        Dim y As Integer
        Dim n As Integer
        Dim txt As String
        Dim x As Integer
        txt = TextBox1.Text
        n = Int(TextBox2.Text)
        x = Int(TextBox3.Text)
        While y <= n
            i = i + 1
            System.Windows.Forms.SendKeys.Send(txt)
            Wait(500, 100)
            System.Windows.Forms.SendKeys.Send(Chr(13))
            Wait(x, 250)
        End While
    End Sub

well you have nothing in your while loop that causes it to end.
it ends when Y<= n but nothing in the loop causes y to become greater.

im not to sure whats going on here either you need to make your variable names describe the purpose of the variable

that doesnt help...

never mind how dumb could i be... thanks bro peace