Impedir que el usuario cierre un formulario


Esto es posible usando el evento QueryUnload del formulario a bloquear: 

Private Sub Form_QueryUnload(Cancel as Integer, UnloadMode As Integer)

MsgBox "No puede cerrar la ventana, lo siento"
If UnloadMode = vbFormControlMenu Then
    Cancel = True 
    End If 
End Sub 

 

Valores de UnloadMode :