برنامج تحديد مواقع احداثيات مؤشر الفارة

تفضل اخي الكريم ;)

حيث x الاحداثي السيني

و y الاحداثي الصادي

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

Print "X = " & X
Print "Y = " & Y
Print
End Sub

يعطيك العافية اخوي عبدالرحمن

هل يمكن اني ادرج صورة في برنامج عن طريق فيجول بيسك ؟

طبعا اخي الكريم

اضافة اداة image وقم باضافة الكود التالي

Private Sub Command1_Click()
Image1.Stretch = True
Image1.Picture = LoadPicture("ضع مسار الصورة هنا")
End Sub