[YousefOkasha]

السلام عليكم و رحمه الله وبركاته اهل المنتدي
خلال تصفحي وجدت هذا الموضع ..
http://vb4arb.com/vb/showthread.php?tid=3986
لكن هذا الموضوع بلغة ال C#
فكل ما احتاجه هو هذا الكود بلغة الفيجوال بيسك . نت
و يفضل شرح بالصور لتركيب الماوس
و جزاكم الله كل خير 

[عبدالله الدوسري]

وعليكم السلام

كود :

Me.Cursor = new cursor("X\\xxxx.cur")

كل كنترول يحتوي على الخاصية Cursor
إستخدمها بنفس الطريقة

كود :

Panel1.Cursor = new cursor("X\\xxxx.cur")

فقط حمل ملف الـ Cursor الذي يعجبك من الرابط في الموضوع

وهذا موقع آخر للتحميل أيضاً ...
http://www.rw-designer.com/cursor-library

بإمكانك وضع الملف في الـ My.Resources

كود :

Dim ms As New System.IO.MemoryStream(My.Resources.Cursor1)
Button1.Cursor = New Cursor(ms)

[YousefOkasha]

شكراً لك اخي ..

[elgokr]

اضافة لما قدمه اخي عبدالله الدوسري

الكود التالى

كود :

Me.Cursor = New Cursor(Application.StartupPath & "MyCursor.cur")

لنقول ان شكل الموس اسمه MyCursor.cur

بهذا الكود سيكون الملف بجانب البرنامج اى بنفس مجلد البرنامج

طيب الكود الحالى يبداء بـ Me

وهنا يقصد الـ Form

اذا كنت تحتاج تخصص شكل معين على اداء 

فقط استخدم الكود بالطريقة التالية

كود :

TextBox1.Cursor = New Cursor(Application.StartupPath & "MyCursor.cur")

أو

كود :

Button1.Cursor = New Cursor(Application.StartupPath & "MyCursor.cur")

... الخ

تحياتى لك

وتمنياتى لك التوفيق

[YousefOkasha]

شكرا لكم جميعا علي هذا الشرح الوافر !

[elgokr]

الشكر لله

تحياتى لك

وتمنياتى لك التوفيق