Visual Basic - Objetos

Tengo un inconveniente y no encuentro la solucion.

En una vble de tipo string tengo el nombre de un formulario de mi proyecto.

Ej:

xx = "frm_ABM_Pedidos"

Como puedo hacer para ejecutar dicho formulario.

Lo que no quiero hacer es un case por el string ya que son 40 formularios.

Existe alguna manera ????

En fox puedo hacer
&xx y listo.

Podre hacer algo parecido en Visual Basic 6.0 ???
Desde ya muchas gracias.

Private Declare Function EbExecuteLine Lib "vba6.dll" (ByVal pStringToExec As Long, ByVal Foo1 As Long, ByVal Foo2 As Long, ByVal fCheckOnly As Long) As Long

Private Sub Command1_Click()
dim stCode as string, code as long
stCode=xx && ".show"
Code = EbExecuteLine(StrPtr(stCode), 0&, 0&, Abs(False)) = 0
End Sub

con esto te lo soluciona

Si quieres mas busca en la MSDN la funcion EbExecuteLine

Private Declare Function EbExecuteLine Lib "vba6.dll" (ByVal pStringToExec As Long, ByVal Foo1 As Long, ByVal Foo2 As Long, ByVal fCheckOnly As Long) As Long

Private Sub Command1_Click()
dim stCode as string, code as long

stCode=xx.text & ".show" ----> ASI si es

Code = EbExecuteLine(StrPtr(stCode), 0&, 0&, Abs(False)) = 0
End Sub

con esto te lo soluciona

Si quieres mas busca en la MSDN la funcion EbExecuteLine