Jobs
Author: raghuraja. C Date Submitted: 2/17/2005 Category: Other Compatibility: VB 6 This code has been accessed 3237 times.
Email Yourself this snippet:
No Declaration
Code
Public Function fnOnlyNumber(KPress As Integer) As Integer On Error GoTo LOCALERRORHANDLER If (KPress >= 48 And KPress <= 57) Or KPress = 8 Or KPress = 13 Then fnOnlyNumber = KPress Else fnOnlyNumber = 0 End If Exit Function LOCALERRORHANDLER: fnOnlyNumber=0