Visual Basic - Sobre formularios

Alguien sabe como saber el numero y nombre de formularios que hay activos? Gracias

Podrías utilizar la Colección Form del Objeyo colecctions, pudiendo recuperar sus nombres por su indice.

Private Sub CommandButton1_Click()
For i = o to Forms.Count -1
msgbox Forms(i).Caption
next
End Sub

Gracias