initiating copies of a form by passing a variable form name

Dim frm2 As Form2
    Dim frmName As Form2
Private Sub InitForm()
        'rem if form not created already, then show it;   If already there, do nothing
        If frm2 Is Nothing OrElse frm2.IsDisposed = True Then
            frm2 = New Form2
        End If
        'rem if invisible, show the NEW frm2 form
        If frm2.Visible = False Then
            frm2.Show()
        End If
    End Sub

    Private Sub btnShowForm2_Click(sender As Object, e As EventArgs) Handles btnShowForm2.Click
'rem use InitForm so initialization of form2 code not repeated;  shows the form
        InitForm() 
    End Sub


'rem Wanted to make same Sub as InitForm, but with a form object passed:

    Private Sub InitFormPassObj(frmName) rem  As Form2)
        'rem is form not created already, then show it;   If already there, do nothing
        If frmName Is Nothing OrElse frmName.IsDisposed = True Then
            frmName = New Form2
        End If
        'rem if invisible, show the NEW frm2 form
        If frmName.Visible = False Then
            frmName.Show()
        End If
    End Sub

    Private Sub btnShowFrm2ObjectPass_Click(sender As Object, e As EventArgs) Handles btnShowFrm2ObjectPass.Click
        Dim frm2 As New Form2
        InitFormPassObj(frm2)
        frm2.SayHello(txtName.Text)
    End Sub
    
    Private Sub btnSayHello_Click(sender As Object, e As EventArgs) Handles btnSayHello.Click
        'rem Say Hello is via Public Property in Form2 called Sub SayHello, which accepts a string
        InitForm()
        'rem SayHello is PUBLIC on Frm2
        frm2.SayHello(txtName.Text)
    End Sub
End Class