MenuBar问题

xml_ug

我增加了一个菜单接钮:
& o$ R& t- Q$ Q" l( i/ `, ^$ C theUI.MenuBarManager.AddMenuAction("ADD_DRAWING_TITLE", AddressOf ADD_DRAWING_TITLE)
; Q, T# X, e; F9 Z* u( a' d" d
1 Z/ L5 {1 z2 P下面是打开对话框:
     Dim response As NXOpen.UIStyler.DialogResponse
$ B3 n8 K  }+ C* c& U        Dim status As NXOpen.MenuBar.MenuBarManager.CallbackStatus
        status = NXOpen.MenuBar.MenuBarManager.CallbackStatus.Continue
' O+ n" W* U9 l3 d9 x           ufs.Ui.LockUGAccess(UFConstants.UF_UI_FROM_CUSTOM)
) M- A& b% y$ l! l            OpenSetTitleDialog1(response) '打开对话框
! j; n2 T2 g- }' J, Q# w            ufs.Ui.UnlockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)
4 \* q( `$ `, m
# s" r8 I" @' g; R9 G: h问题是:打开对话框后,UG的菜单锁定的,我想要是不锁定的状态,如果我在对话框时加" ufs.Ui.UnlockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)",达到我要的效果,但是退出时显示内部错误.有没有办法解决这个问题?