Dim ksWND As integer
Dim ksTitle As String
Dim winS As RECT
If TextBox1.Text"" Then
ksTitle = TextBox1.Text
ksWND = FindWindow(vbNullString, ksTitle)
GetWindowRect(ksWND, winS)
MsgBox("左上角坐标("winS.Left","winS.Top")"vbCrLf"右下角坐标("winS.Right","winS.Bottom")"vbCrLf"窗口高"winS.Bottom - winS.Top"窗口宽"winS.Right - winS.Left)
Else
MsgBox("请填写窗口名称")
End If
End Sub
【vb.net计算窗口 vb的窗口】vb.net计算窗口的介绍就聊到这里吧 ， 感谢你花时间阅读本站内容，更多关于vb的窗口、vb.net计算窗口的信息别忘了在本站进行查找喔 。
推荐阅读
- sap公司供应链管理系统，sap 供应链管理的书籍推荐
- linux执行命令的命令，linux中执行命令
- 德云社怎么加公众号群组，德云社怎么加入
- 如何投诉电商官方店铺，如何投诉电商官方店铺客服
- c语言写出心情函数 c语言爱心
- 删除oracle表索引语句，oracle 删除表和索引
- 直播间里设备，直播间里设备是什么
- linux的echo命令 linux中echo命令的用法
- 哪里有口碑好erp系统，erp谁家的软件好用