MenuBar问题

xml_ug

我增加了一个菜单接钮:
theUI.MenuBarManager.AddMenuAction("ADD_DRAWING_TITLE", AddressOf ADD_DRAWING_TITLE)

% P% m/ Z9 Z0 G; t- R2 q- q下面是打开对话框:
9 H+ g6 O3 V  K; N6 v6 O     Dim response As NXOpen.UIStyler.DialogResponse
  T  W: H' ]7 Z, h" n  E* H0 i        Dim status As NXOpen.MenuBar.MenuBarManager.CallbackStatus
        status = NXOpen.MenuBar.MenuBarManager.CallbackStatus.Continue
" {' I+ a- T: @& u. E- K+ V* |& r           ufs.Ui.LockUGAccess(UFConstants.UF_UI_FROM_CUSTOM)
            OpenSetTitleDialog1(response) '打开对话框
            ufs.Ui.UnlockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)
8 W6 K6 P' Q: h; r4 ^$ W4 S
3 i2 s1 t! y5 E5 j3 C! w问题是:打开对话框后,UG的菜单锁定的,我想要是不锁定的状态,如果我在对话框时加" ufs.Ui.UnlockUgAccess(UFConstants.UF_UI_FROM_CUSTOM)",达到我要的效果,但是退出时显示内部错误.有没有办法解决这个问题?
   
$ w' `. T, p5 I2 R