I got the following code:

In the Keypress event of my textbox, I got the following code:

Private Sub txtRevenue_KeyPress(KeyAscii As Integer)

    Valnum (KeyAscii)

End Sub

In the general area of the form I got the following:
Sub Valnum(iTheKey As Integer)
    If (iTheKey < 48 Or iTheKey > 57) And Not iTheKey = 46 Then
        iTheKey = 0
    End If
End Sub

When iTheKey is set to 0, shouldn't it pass that value back to
KeyAscii since Visual Basic's default is a pass by reference???

It doesn't because even invalid keys are printed.  When the code is
moved into the keypress event of the textbox it works like it is
suppose to.

Please help me to understand what is going on.

Thanks,
Curtis

These parentheses mean that you're passing the
parameter ByVal, i.e. it is equivalent to

ValNum ByVal KeyAscii

You must use either of the following syntaxes(sp?)

1) Call ValNum(KeyAscii)
2) ValNum KeyAscii

N Varacalli
--
The views expressed herein do not represent the views of my employer.

To reach me via e-mail, try (without the asterixes)
***NICHOLAS_VARACALLI at non-hp-Canada-om1.hp.com***

Pursuant to US Code, Title 47, Chapter 5, Subchapter II, Sec. 227,
any and all nonsolicited commercial E-mail sent to this address is
subject to a download and archival fee in the amount of $500 US.
E-mailing denotes acceptance of these terms.