ThinkChat2.0新版上线,更智能更精彩,支持会话、画图、视频、阅读、搜索等,送10W Token,即刻开启你的AI之旅 广告
## **描述** 根据控件的类名设置控件的显示文字 ## **语法** SetElementTextByClassName(*strClassName, strNewText[, intIndex = 1[, UseRegExp = False]]*) **该语法中有下列命名参数:** | 参数 | 描述 | | --- | --- | | strClassName| 必须的。String类型,表示要查找的控件类名。 | | strNewText | 必须的。String类型,表示对控件设置的新内容。 | | intIndex| 可选的。Integer类型,表示次序,如果有多个类名相同的控件,那么这个参数就有用了,依次1、2、3。。。用来区分它们,根据自己的需要使用对应的索引获取,默认是1表示指定类名的第一个控件。**这些输入框的索引可能并不是按照肉眼的顺序来的**,如何区分它们请参考[目标窗体中有相同类名输入框如何区分填写?](03目标窗体中有相同类名输入框如何区分填写?.md)。 | | UseRegExp | 可选的。Boolean 类型,表示是否使用正则。如果忽略,缺省值是 False,它表明默认不使用正则。 | ## **返回值** | Boolean | | --- | | 返回True表示根据类名查找到控件并修改成功,返回False表示未查找到控件 | ## **示例** > 说明:请打开一个记事本,点开菜单“帮助” - “关于记事本”,本示例演示的是如何根据控件类名找到按钮并修改内容。 ``` Dim w As New clsWindow If w.GetWindowByTitle("关于“记事本”", 0).hWnd <> 0 Then If w.SetElementTextByClassName("Button", "请退下") Then MsgBox "按钮内容修改成功!", vbInformation Else MsgBox "未发现目标按钮!", vbExclamation End If End If ``` ![](https://img.kancloud.cn/c0/ec/c0ecedce8be88ff51f23c4a20893baf2_577x590.png)