Add a procedure to a form

[Chris]

If you wish the procedure return a result, then you need to do it this way either private or public

Private Function GetNum(Byval Seek As Long) As Long
    '//Do your process here
End Function

Public Function GetNum(Byval Seek As Long) As Long
    '//Do your process here
End Function

Cheers!