MenuBar问题

xml_ug

我增加了一个菜单接钮:
8 x- l! e! S3 ~! T theUI.MenuBarManager.AddMenuAction("ADD_DRAWING_TITLE", AddressOf ADD_DRAWING_TITLE)
: i: ~( h% I9 g# {9 S
$ \* X* r$ u2 e/ N8 ~1 e下面是打开对话框:
+ T6 i6 e  R$ N: T: ^1 t     Dim response As NXOpen.UIStyler.DialogResponse
        Dim status As NXOpen.MenuBar.MenuBarManager.CallbackStatus
/ u# P5 c, u% _6 G  H' U" l        status = NXOpen.MenuBar.MenuBarManager.CallbackStatus.Continue
6 D- o  i9 c! L3 Y8 {           ufs.Ui.LockUGAccess(UFConstants.UF_UI_FROM_CUSTOM)
1 g4 @- i, K8 L3 F( Q' v            OpenSetTitleDialog1(response) '打开对话框
            ufs.Ui.UnlockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)

, u- b7 q% z/ v: _问题是:打开对话框后,UG的菜单锁定的,我想要是不锁定的状态,如果我在对话框时加" ufs.Ui.UnlockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)",达到我要的效果,但是退出时显示内部错误.有没有办法解决这个问题?
2 u  f* t- x# r   
6 E& L5 J+ J6 d2 ]% c