If ((KeyAscii < 48 Or KeyAscii > 57) And (KeyAscii < 44 Or KeyAscii > 44)) Then If (KeyAscii <> 8) Then KeyAscii = 0 End If