Hello fellow access warriors,
I'm trying to take a private function and turn it public to reduce bloat,
Code:
Private Sub Text0_AfterUpdate()
Select Case [Text0]
Case "N"
Text0 = "No"
Case "Y"
Text0 = "Yes"
End Sub
Here's my code, I've tried converting it to public as shown here
Code:
Public Function Formatter()
Select Case Me
Case "N"
Me = "No"
Case "Y"
Me = "Yes"
End Sub
Then for the box I use
Code:
Private Sub Text0_AfterUpdate()
Formatter
End Sub
I'm guessing theres something glaringly obvious I'm missing here as its giving me a type mismatch error.
What am I missing? thanks guys