problem to save numeric value

[eugzl]

Hi All.


To save record I check form fields if they are empty or greater then zero.

        If Len(Trim(Me.txtTicketNo)) > 0 Then
            !TicketNo = Me.txtTicketNo
        End If


        If Len(Trim(Me.txtAmount)) > 0 Then
            !Amount = Me.txtAmount
        End If

Both txtTicketNo and txtAmount are numeric fields. But error message

popup only for line !TicketNo = Me.txtTicketNo. How to fix the problem?
Thanks

[Gicu]

To check if a number field is not empty and greater than zero you would use something like this:

If Nz(Me.txtYourNumberField,0) >0 Then 
    'do your stuff here
End if

[June7]

Set a breakpoint on that line. What shows as value of txtTicketNo?

[eugzl]

Thanks. I solved the problem by substitute numeric data type from Integer to Long Integer.

[Welshgasman]

Unbound forms appear to be the trend these days?