MessageBox "窗口右下角坐标:" get_window_pos //得到当前最前面的窗口句柄-就是把需要的窗口激活在最前面 Hwnd = Plugin.Window.Foreground() //得到鼠标指向的窗口句柄Hwnd = Plugin.Window.MousePoint() 2种都是可以获取句柄的 MessageBox Hwnd //获取窗口位置 Function get_window_pos() //我是一个函数,被你调用了 //Window插件获取窗口坐标[code]Call RunApp("notepad.exe") Delay 1500 //0表示忽略 //下面这句是查找窗口类名("Notepad")或者标题(0),返回找到的句柄Hwnd Dim Hwnd, str_win //Hwnd = Plugin.Window.Find("QQ.exe", 0) Hwnd = Plugin.Window.MousePoint() //下面这句是得到窗口句柄的客户区大小 str_win = Plugin.Window.GetClientRect(Hwnd) TracePrint "得到窗口句柄的客户区大小为:" & str_win //下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串 Dim arr_win, win_a, win_b, win_c, win_d arr_win = Split(str_win, "|") //下面这句将字符串转换成数值 win_a = Clng(arr_win(0)) : win_b = Clng(arr_win(1)) win_c = Clng(arr_win(2)) : win_d = Clng(arr_win(3)) MessageBox "窗口左上角坐标:" & win_a & "," & win_b MessageBox "窗口右下角坐标:" & win_c & "," & win_d End Function //定义一个函数,可以在脚本中调用这个函数,支持参数和返回值