Timer

[Electroman]

Place a Timer on your form and call it TmrLabel then add this code:

Private Sub TmrLabel_Timer()
Static Times As Integer
    
    If Times = 10 Then ' Change 10 to the amount of steps you want!
        'Hide the other form...
        Form2.Visible = False
        
        'Disable the Timer...
        TmrLabel.Enabled = False
        
        'Set Times to zero so it can be run again...
        Times = 0
    Else
        'Do the code to make the label smaller...
        
        
        'Increment the counter...
        Times = Times + 1
    End If
End Sub

Hope that helps you, I didn't do the code for shrinking the label because I wasn't sure how your going about that .