Im trying to put a delay between the button click and the message box that pops up. Here is my code, please help me out with this.

Private Sub TimerFire()
Me.Timer1.Interval = 3000
Me.Timer1.Enabled = True
End Sub

Private Sub TimerStop()
Me.Timer1.Enabled = False
End Sub

Private Overloads Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TimerFire()
MsgBox("ok")
End Sub