MenuBar问题

xml_ug

我增加了一个菜单接钮:
% |! w4 z: X, I0 Z# h theUI.MenuBarManager.AddMenuAction("ADD_DRAWING_TITLE", AddressOf ADD_DRAWING_TITLE)

# ?/ f; n6 T. W9 F, g9 A下面是打开对话框:
/ Z9 |! Y6 C5 q1 C! s3 r8 M     Dim response As NXOpen.UIStyler.DialogResponse
" n2 T1 B: h0 A) y        Dim status As NXOpen.MenuBar.MenuBarManager.CallbackStatus
        status = NXOpen.MenuBar.MenuBarManager.CallbackStatus.Continue
           ufs.Ui.LockUGAccess(UFConstants.UF_UI_FROM_CUSTOM)
# P" e  }  C6 N% Q* a9 s            OpenSetTitleDialog1(response) '打开对话框
( s( y! u! C( d& B            ufs.Ui.UnlockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)
+ _1 o0 `! ^" s3 A" Q/ e
/ @3 F& Q7 R$ p# Q4 Y5 C& G问题是:打开对话框后,UG的菜单锁定的,我想要是不锁定的状态,如果我在对话框时加" ufs.Ui.UnlockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)",达到我要的效果,但是退出时显示内部错误.有没有办法解决这个问题?