نقل قول نوشته شده توسط Business Analyst مشاهده تاپیک
باید توی رویداد کلیک کنترل هم کد بزنی مثل
PrivateSubButton1_MouseClick(ByValsenderAsObject, ByValeAsSystem.Windows.Forms.MouseEventArgs) HandlesButton1.MouseClick

MessageBox.Show(e.Location.X)

MessageBox.Show(e.Location.Y)

EndSub
سلام
در ویژوال بیسیک هنگامی که شما روی کنترلی کلیک می کنید،
ByVal e As System.EventArgs
ارسال می شه که اطلاعاتی در مورد مختصات بهتون نمی ده.
البته تاجایی که من یاد گرفتم. حالا شاید یه جورایی بشه این کار رو کرد نمی دونم.

اما برای به دست آوردن مختصات ماوس، باید از توابع api استفاده کنید. 


DeclareFunction GetCursorPos Lib"user32" (ByRef lpPonit As POINTAPI) As Int32


شما باید یه ورودی که به صورت زیر تعریف می شه بهش بدید. 



Structure POINTAPI

Dim x As Int32

Dim y As Int32

EndStructure



حالا هر جایی که می خواید مختصات رو به دست بیارید، حتی اگه خارج از محدوده فرمتون باشه از کد زیر بهره بگیرید


Dim pp As POINTAPI

GetCursorPos(pp)

MsgBox(pp.x)

MsgBox(pp.y)