Private Sub Command1_Click()
Type dian '就是这儿出错,怎么回事
x As Integer
y As Integer
End Type
Dim mypoint As dian
mypoint.x = 0
mypoint.y = 0
Call SendMessage(210346, WM_LBUTTONDOWN, MK_LBUTTON, point)
End Sub

我想自动点一下按扭呀
我给我妈刷QQ分,我自动点认输..

谢谢