Public Sub button1_Click ( ByVal sender As System . Object , ByVal e As System .
Sub Timer1_Tick ( ByVal sender As Object , ByVal e As EventArgs ) Handles Timer1 .