From form frmBonus12
frmBonusWin.StartTimer

in calling this sub it does not fire the timer


Public Sub StartTimer()
Timer2.Interval = 1000
Timer2.Enabled = True
End Sub

it does not go to the timer at all

Private Sub Timer2_Timer()
If mTime <= 3 Then
'Timer2.Enabled = True
mTime = mTime + 1
If mTime >= 4 Then
Timer2.Enabled = False
Me.Visible = False
frmCleo.Show
frmCleo.AddBonusWinnings
End If

End If
End Sub
what could cause this ?