2012-07-17 117 views
1

我正在尝试切换“锁定”元素,以便在执行检查后不再锁定它。在该按钮的属性中,我已将默认值设置为“锁定”,以便用户不能使用它的功能。在VBA中切换锁定和解锁的工具箱元素

当另一个按钮被点击时,我的宏运行一个进程,如果进程返回true,那么另一个'锁定'按钮应该是'解锁',并且包含名字的文本框应该'锁定'以防止更改。处理过程在一个名为'PNC_Module2'的模块中完成,我希望锁定和解锁元素的表单称为'folder_creator_window'。

我目前使用以下行,试图实现“锁定和解锁”,但似乎并没有被做任何事情:

'This is supposed to unlock the create_folders_button 
    folder_creator_window.create_folders_button.Locked = False 

    'This is supposed to lock the p_name_textbox textbox 
    folder_creator_window.p_name_textbox.Locked = True 

我还没有包括代码的其余部分因为它没有真正禁止在这里发生的事情。

回答

1

看到你的代码的其余部分你的语法看起来不错

但你的追求可能会揭示问题,要求反复的通常方法是将反向使用NOT的当前状态。即要在用户窗体1上的CommandButton1上切换Locked,您可以使用:

UserForm1.CommandButton1.Locked = Not UserForm1.CommandButton1.Locked