MenuBar问题

xml_ug

我增加了一个菜单接钮:
theUI.MenuBarManager.AddMenuAction("ADD_DRAWING_TITLE", AddressOf ADD_DRAWING_TITLE)
; ?; ~) R7 k7 N! A
; L; ^9 U8 a7 u  D下面是打开对话框:
) I: M% w1 |; \     Dim response As NXOpen.UIStyler.DialogResponse
        Dim status As NXOpen.MenuBar.MenuBarManager.CallbackStatus
        status = NXOpen.MenuBar.MenuBarManager.CallbackStatus.Continue
1 ]- M. o8 b  D- ?           ufs.Ui.LockUGAccess(UFConstants.UF_UI_FROM_CUSTOM)
' ^: G1 E& M) a! Q4 O4 w! f            OpenSetTitleDialog1(response) '打开对话框
  }3 j# \- r4 Q# [4 T5 d            ufs.Ui.UnlockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)

问题是:打开对话框后,UG的菜单锁定的,我想要是不锁定的状态,如果我在对话框时加" ufs.Ui.UnlockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)",达到我要的效果,但是退出时显示内部错误.有没有办法解决这个问题?
% U/ W1 n3 u: v, h5 K: y   
$ _9 @7 f7 F7 P  Y