네비게이션 양식 액세스, 언로드 이벤트 취소

Question

내 탐색 서브 폼의 언로드 이벤트에서 다음 코드가 있습니다.

If MsgBox ("Changes have not been locked and will be lost. Do you wish to proceed?", vbYesNo) = vbNo Then 
    Cancel = True 
End If 

사용자가 부모의 다른 탐색 버튼 중 하나를 클릭

는 관계없이 선택한 항목의 폐쇄 및 활성 하위 폼을 삭제의 예/아니오 메시지 상자를 표시 없지만 이동합니다 형성한다. 탐색 버튼을 클릭하여 발생하는 탐색을 취소 할 수 있습니까?

Answer 1

if 문 외부에있는 내용이 명확하지 않지만 Exit Sub 명령을 사용해야합니다. 이렇게하면 내비게이션을 완전히 멈추게 할 수 있습니다 (자체가 Sub 인 경우).

If MsgBox ("Changes have not been locked and will be lost. Do you wish to proceed?", vbYesNo) = vbNo Then 
    Exit Sub 
End If