
04/03/2005, 10:08
|
 | | | Fecha de Ingreso: febrero-2005
Mensajes: 81
Antigüedad: 20 años, 2 meses Puntos: 0 | |
Prueba con esto
Private Sub Form_Activate()
Dim i As Long
If Forms.Count > 0 Then ' Si count > 0 hay más de un form cargado
For i = 0 To Forms.Count - 1 ' recorro los formulario cargados
If Forms(i).Name <> Me.Name Then
Forms(i).Hide' si el nombre del formulario es distinto al del formulario activo lo escondo o lo descargo lo que sea mas conveniente
End If
Next i
End If
End Sub |