معلومة ::: NumericUpDown - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182) +--- قسم : قسم مقالات VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=184) +--- الموضوع : معلومة ::: NumericUpDown (/showthread.php?tid=5292) |
معلومة ::: NumericUpDown - RaggiTech - 06-10-12 كاتب الموضوع : BADRMEDIA
الأداة NumericUpDown : أداة جميلة فى ادخال الأرقام بحيث تحصر المستخدم بان يقوم بالادخال فى اطار محدد سنتعرف على أهم خصائصها بعد أن ندرجها من قائمة الأدوات Tool Box نقوم بادراجها ونذهب إلى نافذة خصائص الأداة : هناك خاصيتان مسئولتان عن بداية الادخال ونهاية الادخال وهما : Minimum : وهو أقل رقم يمكن ادخاله Maximum : أكبر رقم يمكن ادخاله وهذا يتم تعديله من نافذة الخصائص أو بالكود من هذه الخصائص للأداة : كود : NumericUpDown1.Minimum = -100 معلومة ::: NumericUpDown - RaggiTech - 06-10-12 لقد وضعنا حد اعلى أدنى للأرقام - بحيث أن المستخدم يختار من : إلى هل يمكن أن نجعل الأرقام بناء على تسلسل معين أو بمعنى زيادة معينة نعم يمكن ذلك فبعد أن تحدد الحد الأعلى والحد الأدنى - تقوم بتحديد Increment وهى الخاصية المسئولة عن معدل الزيادة للأرقام ونقوم بتعديل من نافذة الخصائص حيث القيمة الافتراضية هى 1 أو بالكود من نفس الخاصية : كود : NumericUpDown1.Increment = 5 معلومة ::: NumericUpDown - RaggiTech - 06-10-12 يسال أحد الأخوة ويقول - نريد أن ندخل قيم بها أرقام عشرية نعم ذلك متاح لكن بشرط - يجب تحديد عدد الخانات العشرية وذلك من الخاصية DecimalPlaces من نافذة الخصائص حيث القيمة الافتراضية 0 وتضع عدد الخانات العشرية المطلوبة كود : [/FONT][/b][/FONT][/color]' حددنا عدد الخانات معلومة ::: NumericUpDown - RaggiTech - 06-10-12 ماذا لو أردت أن استخدم الأداة فى أرقام تتعدى الآلاف وأريد أن تقوم الأداة بوضع فاصلة بعد الألف للرقم الموجود ذلك من الخاصية ThousandsSeparator بنجعل قيمتها تساوى True من نافذة الخاصائص واليك المثال اجعل اقل رقم = 1 واكبر رقم = 100000 واجعل الخاصية ThousandsSeparator = True أو عن طريق الكود : كود : [/b][/FONT][/COLOR]NumericUpDown1.Minimum = 0 NumericUpDown1.Maximum = 100000 معلومة ::: NumericUpDown - RaggiTech - 06-10-12 تتيح لك هذه الأداة أيضاً أن تظهر الأرقام المدخلة فى صورة Hexadecimal كل ما عليك أنه فى نافذة الخصائص تجعل هذه الخاصية Hexadecimal = True ومثال بالكود : كود : [/b][/FONT][/COLOR]NumericUpDown1.Minimum = 0 NumericUpDown1.Maximum = 1000 معلومة ::: NumericUpDown - RaggiTech - 06-10-12 الآن سنكتب تلميحة لنجعل الاداة أكثر حيوية ولنفرض أنك وضعت فى الأدة أقل = -100 وأكبر حد = 100 تريد ان المستخدم عندما يضغط PageUp يقوم الرقم بالزيادة بمعدل 5 وعندما يضغط PageDown يقوم النقصان بمعدل 5 لنقوم بالمثال التالي : سنقوم بتعريف ثابت ونضغه فى القسم العام للفورم كود : Private Const intStep As Integer = 5 فى حدث Load للفورم ينقوم بضبط خصائص الأداة - هذا لو انت لم تضبطها من نافذة الخصائص كود : Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load فى حدث KeyDown للأداة سنكتب الكود التالي : كود : Private Sub NumericUpDown1_KeyDown(ByVal sender As System.Object, _ الكود واضح ومعالج فى حالة أن عملية الزيادة او النقصان تتخطى الحد الاعلى والأدنى معلومة ::: NumericUpDown - RaggiTech - 06-10-12 سهى أعلى وأسفل المخصوصان بالزيادة والنقصان موجودان بيمين الأداة - لنفرض أنك تريدهم باليسار يكون ذلك عن طريق الخاصية UpDownAlign من نافذة الخصائص كود : [COLOR=#0000FF][FONT=arial][b] ========================================== ماذا لو أردت أن يصنع زرين يقوموا بوظيقة سهى أعلى وأسفل المخصوصان بالزيادة والنقصان ضع زرين أمر Button واجعل احدهم للزيادة والاخر للنقصان لتشغيل زر الزيادة كود : NumericUpDown1.UpButton()[/b][/FONT][/COLOR] [color=#0000FF][FONT=arial][b]لتشغيل زر النقصان [COLOR=#0000FF][FONT=arial][b] كود : NumericUpDown1.DownButton() |