Post Method, Step1 (Visual Basic)
Public Function Post(ByRef lngAccount As Long, _
ByRef lngAmount As Long) As String
On Error GoTo ErrorHandler
Post = "Hello from Account!!!"
Exit Function
' Return the error message indicating that
' an error occurred.
ErrorHandler:
Err.Raise Err.Number, "Bank.Account.Post", _
Err.Description
End Function