Passing Userform Control to Subroutine

[cellist]

I want to pass values from a userform textbox to a subroutine by reference so
that the subroutine can pass back the result into the textbox.

doEqual tbResult1.Value, tbInput1.Value

Private Sub doEqual(resultAmt, inAmt)

This runs OK and debug "watch" values show the correct amount in resultAmt
and InAmt, but tbResult1.Value remains unchanged. Is this a syntax issue,
or???

TIA,

Phil

 

[Peter T]

Private Sub doEqual(resultAmt, tbx As MSForms.TextBox)
tbx.text = "Amount = " & resultAmt

In the calling procedure pass a referent to the textbox, if that's in the
parent userform -
Call doEqual(123, me.Textbox1)

Regards,
Peter T

 

[cellist]

Peter,

Thanks for your help, that clears it up for me.

Regards,

Phil