Question

vb 如何定位控件坐标进行模拟鼠标的点击？

要求源代码，可以得到任意控件的绝对坐标，而不管这个窗口放在屏幕的什么位置上。

Answer 1

用控件的相对坐标加上FORM的坐标不就OK了

以command控件为例

Dim x As Long, y As Long '定义x和y坐标值为长整 型,(单位是twip)

Private Sub Command1_Click()
x = Command1.Left + Form1.Left '计算横坐标
y = Command1.Top + Form1.Top '计算纵坐标
Print x
Print y

End Sub