Add text after few seconds

[louvelle]

Try this:

Public Class Form1
    Public myvar As Integer = 0
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        RichTextBox1.AppendText("Scanning...")

        Timer1.Enabled = True


    End Sub
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If myvar = 10 Then
            RichTextBox1.AppendText("Fix Errors...")
            Timer1.Enabled = False
        Else
            myvar = Val(myvar) + 1
        End If
    End Sub
End Class

You're supposed to increment the integer "myvar" by one if "myvar" is not equal to 10.

Hope this helps..