易语言怎么控制另一个软件上的按钮

1.用精易编程助手分别分析目标按钮的顶级窗口和父窗口的类名和窗口标题

2.分析目标按钮的标题

3.在易语言内写代码，用精益模块的命令“窗口_取句柄（）”取出按钮句柄

4.用精益模块的命令“鼠标_消息（）”点击目标按钮

只在Sheet3放一个按钮就行。

按钮指定到SUB

Sub 清空数据()

Sheet1.[A1:A5].ClearContents

Sheet2.[A1:A5].ClearContents

End Sub

补充说明：

工作表名Sheet1是指工作表的大名，不一定与左下角看到的工作表名相同，

工作表的大名是不能更改的，平时咱们对工作表重命名，是改的小名。

在VBA编辑器的左侧栏中，可能看到：工作表大名(工作表小名)

在VBA中，对工作表的称呼有三种：

第一种就是刚才说的大名，写法为：

Sheet1.range("A1")

第二种是工作表小名，就是可以重命名的名称，写法为：

Sheets("汇总表").range("A1")

第三种是顺序名，按从左到右的顺序，

比如左边第1张表写法为：

Sheets(1).range("A1")

比如最后一张表的写法为：

Sheets(Sheets.count).range("A1")

顺序名的写法，不是指固定的表，因为可以人为移动表的顺序，但是Sheets(1)永远是指第1张表，不论是怎么移动表的顺序。

下是代码首先用窗口标题取被改变标题窗口的句柄，然后通过dll命令改变标题。

（被改变窗口标题是“要改变的标题”）

.版本

2

.程序集

窗口程序集1

.程序集变量

句柄,

整数型

.子程序

__启动窗口_创建完毕

.子程序

窗口_置标题,

逻辑型,

公开,

改指定窗口句柄的窗口标题(非"0"表示成功,返回"0"表示失败)

.参数

窗口句柄,

整数型,

,

欲更改窗口标题的句柄

.参数

新标题,

文本型,

,

欲改成的新标题

返回

(SetWindowTextA

(窗口句柄,

新标题))

.子程序

取句柄,

整数型,

公开,

成功返回控件的句柄，失败返回0

.参数

父窗口句柄,

整数型,

可空,

如果是取顶级的窗口句柄请留空

.参数

子窗口句柄,

整数型,

可空,

如果是取顶级的窗口句柄请留空

.参数

窗口类名,

文本型,

可空,

窗口的类名

.参数

窗口标题,

文本型,

可空,

窗口的标题

返回

(FindWindowExA_文本

(父窗口句柄,

子窗口句柄,

窗口类名,

窗口标题))

.子程序

_按钮1_被单击

句柄

＝

取句柄

(,

,

,

“要改变的标题”)

窗口_置标题

(句柄,

“你好！”)

.版本

2

.DLL命令

FindWindowExA_文本,

整数型,

"user32",

"FindWindowExA",

公开

.参数

父窗口句柄,

整数型

.参数

子窗口,

整数型

.参数

类名,

文本型

.参数

标题,

文本型

.DLL命令

SetWindowTextA,

逻辑型,

"user32",

"SetWindowTextA",

公开,

窗口_置标题

.参数

hwnd,

整数型

.参数

窗口标题,

文本型

---