Hola:
Yo lo utilizo en una aplicacion y funciona perfectamente, este es el código:
Código vb:
Ver originalPrivate Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
' Control Boton de Cierre
If UnloadMode = vbFormControlMenu Then
Me.WindowState = vbMinimized
Cancel = True
End If
End Sub
Saludos