Visual Basic - Problemas al llamar una forma en un string

Estimados colegas tengo un problemita por ahi y talvez ustedes me pueden ayudar, resulta ser que tengo en un string el nombre de una forma

Deseo llamar esa forma desde una mdiform

DetalleFrm.show

pero como es un string

StrForma = "DetalleFrm"

como puedo hacerlo?? alguna idea
he revisado documentacion pero no encuentro nada al respecto solo "controls" y eso me sirve solo para objetos dentro de la forma

gracias por su ayuda

getForm("form1").Show

Public Function getForm(rstrNombre As String) As Form
Dim i As Integer
For i = 0 To Forms.Count - 1
If StrComp(Forms(i).Name, rstrNombre, vbTextCompare) = 0 Then
Set getForm = Forms(i)
Exit Function
End If
Next
End Function

Un saludo

Gracias Estimado
te comento que ya encontre otra forma de hacerlo lo dejare aqui para que junto con la tuya queden como referencia.

Mil gracias por tu interes en ayudarme

Dim x as Object

Set x = forms.ad("nombre de la forma")

x.show

obviamente hay que manejar el error si la forma no existe pero eso es lo mas facil

Gracias de nuevo

Saludos