How do I pass a field name to a function?

[zpq]

tia

stan

[rkc]

As an arguement to the function.

[Salad]

zp*@comcast.net wrote:

tia

stan

Sub DisplayResults
Dim x As Integer
Dim y as Integer

x = 1
y = 2

msgbox "The total is " & SumIt(x,y)
endsub
Function SumIt(Value1 as integer, Value2 as integer) As Integer
SumIt =Value1 + Value2
End Function

[rkc]

"Salad" <hi**********@ranch.com> wrote in message
news:3F***************@ranch.com...

zp*@comcast.net wrote: Function SumIt(Value1 as integer, Value2 as integer) As Integer
SumIt =Value1 + Value2
End Function

Function Palatable (dt As Access.TextBox) as Boolean
If dt.Value <> "Ranch" then Palatable = TRUE
End Function