Lo mas facil es agregar:
Un combo
Un Boton
Cargas los nombres de los formularios en el combo...
Y en el boton usas un selec case
Código:
Private Sub Command1_Click()
Dim formulario
formulario = Combo1.Text
Select Case formulario
Case "Form2"
Form2.Show
Case "Form3"
Form3.Show
End Select
End Sub
con eso es suficiente.