1个回答
展开全部
Hwnd = Plugin.Window.Foreground()
sRect = Plugin.Window.GetClientRect(Hwnd)
MsgBox "得到窗口句柄的客户区大小为:"& sRect
//下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串
MyArray = Split(sRect, "|")
//下面这句将字符串转换成数值
L = Clng(MyArray(0)): T = Clng(MyArray(1))
R = Clng(MyArray(2)): B = Clng(MyArray(3))
Msgbox "左" & L & ",右 "& R & ",上" & T & ",下" & B
sRect = Plugin.Window.GetClientRect(Hwnd)
MsgBox "得到窗口句柄的客户区大小为:"& sRect
//下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串
MyArray = Split(sRect, "|")
//下面这句将字符串转换成数值
L = Clng(MyArray(0)): T = Clng(MyArray(1))
R = Clng(MyArray(2)): B = Clng(MyArray(3))
Msgbox "左" & L & ",右 "& R & ",上" & T & ",下" & B
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |