Forms :: Use Same Code For Multiple Forms

I've been trying to figure a way to minimize my code in a module. I currently have three function built excalty the same way to work with three different forms. Each textbox in all the forms are named the same now what I'm trying to do is have the function identify which form called the function and where should the data be.

Code:
Dim frmCurrentForm As Form
Set frmCurrentForm = Screen.ActiveFormMsgBox "Current form is " & frmCurrentForm.Name

Once that is found. have something like this.

Code:
Select Case frmCurrentForm.Name
Case 1
WorkForm = Form1

Case 2
WorkForm = Form2

End
Code:
WorkForm.NameField = "John Smith"

No matter if all three forms are open the data should only go to the one that declared the function.