هذه الاداة ممتازه للحصول على رقم تصاعدي او تنازلي بشكل سريع
لكنني لم أجد ضمن أحداثها ما يدل على أن المستخدم ضغط السهم للأعلى أم للأسفل
أي هل الرقم يسير في الاتجاه التنازلي ام التصاعدي !!!!!!!!!!!!!111
هل أحد يعرف حل لهذا الامر؟؟؟
هذه الاداة ممتازه للحصول على رقم تصاعدي او تنازلي بشكل سريع
لكنني لم أجد ضمن أحداثها ما يدل على أن المستخدم ضغط السهم للأعلى أم للأسفل
أي هل الرقم يسير في الاتجاه التنازلي ام التصاعدي !!!!!!!!!!!!!111
هل أحد يعرف حل لهذا الامر؟؟؟
------------------وما توفيقي إلا بالله--------------------
إذا كنت بالله مستعصما---------فماذا يضيرك كيد العبيد
ما الهدف من سؤالك؟
طالما أنه يمكنك مراقبة تغير القيمة وبهذا تستطيع معرفة هل المستخدم يزيد أو ينقص القيمة الموجودة في التحكم وذلك عن طريق الحدث ValueChanged
تم تعديل هذه المشاركة بواسطة محمد سامر أبو سلو في 2 أغسطس 2007 في 00:35
عن عائشة رضي الله عنها أن النبي صلى الله عليه وسلم قال: إن الله يحب إذا عمل أحدكم عملا أن يتقنه
نعيب زماننا والعيب فينا ... وما لزماننا عيب سوانا
ونهجو ذا الزمان بغير ذنب ... ولو نطق الزمان لنا هجانا
محمد سامر أبو سلو
بكل تأكيد يمكن برمجيا فعل ما تريد
لكن الان امامي اداة جاهزه
حقيقة انا لدي معادله معينه وأريد أن افرق بين ضغط المستخدم لكي أغير العلامه من + الى - والعكس
هل المستخدم يزيد الرقم ام ينقصه (طبعا على افتراض أنه مبرمج ضمن الاداة أحداث خاصه بذلك ) وإلا سأضطر لإعداده برمجيا
مع أنني مستغرب من عدم وجود مثل هذه الاحداث !!!!!!!
------------------وما توفيقي إلا بالله--------------------
إذا كنت بالله مستعصما---------فماذا يضيرك كيد العبيد
كذلك اخي محمد لو تضع مثال بسيط عن كيفية مراقبة القيمه أكون شاكرا لك
------------------وما توفيقي إلا بالله--------------------
إذا كنت بالله مستعصما---------فماذا يضيرك كيد العبيد
السلام عليكم و رحمة الله و بركاته
أخ أبو عبدالملك يمكن معرفة ذلك بسهولة كما قال لك الاخ محد و ذلك من خلال مراقبة القيمة عن طريق الاجراء ValueChanged و الكود التالي يوضح الطريقة :
NUD هو الكائن المستخدم و LBL هو عبارة عن Lable
Public Class Form1 Dim V As Integer = 0 Private Sub NUD_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NUD.ValueChanged If NUD.Value > V Then LBL.Text = "الرقم يتزايد" V = NUD.Value ElseIf NUD.Value < V Then LBL.Text = "الرقم يتناقص" V = NUD.Value End If End Sub End Class
نرجو أن يكون المثال واضحاً ، مع خالص تحياتي ....
شكرا لك اخي ابو السيد
مثال واضح جدا ....والافكار متقاربه الى حد بعيد .........
كنت أتوقع في البداية أن أجد حدث جاهز بحكم أن الأداة ـوحي بذلك
من الناحيه البرمجيه فقد كفيت ووفيت فشكرا لك والشكر موصول للجميع
تم تعديل هذه المشاركة بواسطة محمد سامر أبو سلو في 3 أغسطس 2007 في 11:46 — السبب: وضع رابط لموضوع لاعلاقة له بالسؤال المطرو
------------------وما توفيقي إلا بالله--------------------
إذا كنت بالله مستعصما---------فماذا يضيرك كيد العبيد
هذا الموضوع مغلق.