كيف اغير ايقونة النموذج والغاء مفتاحي الصفحات

اخي الكريم seaali

اقتباس

السؤال الأول

ماهي الطريقة لتغير أيقونة النموذج ؟

تكون الطريقة كالتالي

ستكون ايقونة النموذج قبل التغيير بهذه الطريقة

2. من قوائم الأكسيس اختر ادوات ثم بدأ التشغيل

3.من رمز التطبيق اضغط استعراض الملفات لوضع مسار الصورة ( ويفضل ان تكون من نوع ICO لأن حجمها صغير )

4. طبعا سيظهر لك مستعرض الملفات بهذا الشكل اختر اي صوره تريد ثم موافق

5. ستجد ان مسار الصورة تم ادارجه مع ملاحظة وضع علامة صح على الخانة ( وضع كرمز نموذج و تقرير )حتى تظهر في النماذج والتقارير جميعا - اضغط الآن موافق

6. بعد الإنتهاء ستجد ان الأيقونه تم ادراجها بهذه الطريقة

وهذا مثال على ذلك ( ستجد في مجلد المثال انني وضعت لك صور ايقونات جاهزه للتطبيق عليها )

IconForm.rar

اقتباس

السؤال الثاني

وجدنا حل لأيقاف عجلة الماوس ولكن لاتزال المشكلة وهو الزرين PAGE UP وPAGE DOWN

هذا الزرين يعمل نفس عمل عجلة الماوس ماهو الحل لأيقافها

يمكن الغاء مفتاحي الصفحة لأعلى PageUp والصفحة لأسفل PageDown بهذه الطريقة

1. عند حدث مفتاح للاسفل OnKeyDown نضع هذا الكود

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case 33, 34
KeyCode = 0
End Select
End Sub

2. سنجد ايضا من ضمن اجراءات تبويب الحدث اجراء وهو

مفتاح العرض التمهيدي : نضعه على نعم KeyPreview: Yes

الأحت زهره ... جزاك الله كل خير أيتها الفاضله على مساعدة الناس.........