API函数getWindowRect()的定义
PrivateDeclareAutoFunctionGetWindowRectLib"user32"(ByValhwndAsIntPtr,ByVallpRectAsRECT)AsLong
位置信息结构体
PublicStructureRECTPublicleftAsInt32
PublictopAsInt32
PublicrightAsInt32
PublicbottomAsInt32
EndStructure
GetWindowRect(Me.Handle,p1)
问题描述：
使用GetWindowRect函数来获取窗体的位置信息时，RECT中的left ，top ，right ，bottom 都是0
产生问题的原因：
API传递结构一般不用ByVal
解决方案：
ByVallpRectAsRECT改成ByReflpRectAsRECT