ThinkChat2.0新版上线,更智能更精彩,支持会话、画图、视频、阅读、搜索等,送10W Token,即刻开启你的AI之旅 广告
## **描述** 得到窗口或控件的禁用状态 ## **语法** *object.* Enabled[= value] **该语法中有下列命名参数:** | 参数 | 描述 | | --- | --- | | vNewValue | 必须的。 Boolean类型,表示要设置的窗口或者控件是否可用。 | ## **返回值** | Boolean | | --- | | 窗口或控件可用返回True,不可用返回False | ## **示例** > 说明:打开一个记事本,编辑框里面输入点内容,然后测试下面代码。 ``` Dim w As New clsWindow w.GetWindowByClassName("Notepad", 0).Enabled = False MsgBox "点击记事本的菜单及编辑框框框,你会发现记事本没反应了", vbInformation w.GetWindowByClassName("Notepad", 0).Enabled = True MsgBox "恢复记事本可用,现在记事本正常了", vbInformation w.GetWindowByHwnd(w.GetElementHwndByClassName("Edit")).Enabled = False MsgBox "再点记事本的菜单和编辑框框框,你会发现编辑框不能用了,但是菜单正常,这就是局对控件的禁用", vbInformation w.GetWindowByHwnd(w.GetElementHwndByClassName("Edit")).Enabled = True MsgBox "恢复记事本编辑框可用,现在正常了", vbInformation ``` 下图中编辑框内容被禁用了: ![](https://img.kancloud.cn/8f/92/8f92ad4cb60085884f8074f66a112bcc_491x340.png)