منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] عدم تغيير قيمة NumericUpdown - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] عدم تغيير قيمة NumericUpdown (/showthread.php?tid=26841)

عدم تغيير قيمة NumericUpdown - Simo1991 - 08-10-18

السلام عليكم

عندي numericupdown أدخل فيها عدد معين و عندي button  تقوم بتغيير هدا العدد وتظهر النتيجة في textbox المشكلة أن النتيجة تتغير أيضا في numericupdown اريدها ان تبقى هناك ثابتة

شكرا

RE: عدم تغيير قيمة NumericUpdown - ابراهيم ايبو - 08-10-18

السلام عليكم اخي الكريم 
طلبك غبر واضح حبث انك تقوم بتغيير هذا الرقم ولكن لم توضح الى ماذا تغير والغاية من التغيير
 هل هو عملية حسابية ام قيمة تتبع لحالة شرطية او غير ذلك , او ضع الكود او المشروع لتتم المعالجة


RE: عدم تغيير قيمة NumericUpdown - Simo1991 - 08-10-18

(08-10-18, 08:00 PM)ابراهيم ايبو كتب :
السلام عليكم اخي الكريم 
طلبك غبر واضح حبث انك تقوم بتغيير هذا الرقم ولكن لم توضح الى ماذا تغير والغاية من التغيير
 هل هو عملية حسابية ام قيمة تتبع لحالة شرطية او غير ذلك , او ضع الكود او المشروع لتتم المعالجة

NumericUpDown.Value -= 1

        TextBox.Text=NumericUpDown.value
تتغير النتيجة في textbox و numericupdown

RE: عدم تغيير قيمة NumericUpdown - ابراهيم ايبو - 08-10-18

اخي ان كنت تقصد انك تختار قيمة في numeric وتضغط على الزر ويظهر نفس القيمة في مربع النص فإليك هذا الكود
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       TextBox1.Text = NumericUpDown1.Value.ToString()
   End Sub


RE: عدم تغيير قيمة NumericUpdown - Simo1991 - 08-10-18

(08-10-18, 08:12 PM)ابراهيم ايبو كتب : اخي ان كنت تقصد انك تختار قيمة في numeric وتضغط على الزر ويظهر نفس القيمة في مربع النص فإليك هذا الكود
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       TextBox1.Text = NumericUpDown1.Value.ToString()
   End Sub
شكرا أخي لكن ليس هدا ما أريد
القيمة تتغير كلما ضغطت على الزر وتظهر لي النتيجةفي textbox لكنها تتغير أيضا في خانة numericupdown وانا اريد ان تبقى هناك القيمة البدئية ثابتة

RE: عدم تغيير قيمة NumericUpdown - ابراهيم ايبو - 08-10-18

تفضل اخي simo
ارجو ان يكون هذا طلبك مع كل ضغطة سوف تزداد القيمة في مربع النص وتبقى ثابتة في الـ numeric
كود :
 Dim x As Integer = 0
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       TextBox1.Text = (NumericUpDown1.Value + x).ToString()
       x += 1
   End Sub
اخي هذا مثال وفيه زر Reset حيث يتم التصفير والبدء من القيمة التي تريد

ولاحظ ان الكود تغير قليلا حيث ازدياد المتغير x اصبح في الاول
عفوا تم حذف المرفق بالخطأ

RE: عدم تغيير قيمة NumericUpdown - rnmr - 09-10-18

(08-10-18, 08:08 PM)Simo1991 كتب :
(08-10-18, 08:00 PM)ابراهيم ايبو كتب :
السلام عليكم اخي الكريم 
طلبك غبر واضح حبث انك تقوم بتغيير هذا الرقم ولكن لم توضح الى ماذا تغير والغاية من التغيير
 هل هو عملية حسابية ام قيمة تتبع لحالة شرطية او غير ذلك , او ضع الكود او المشروع لتتم المعالجة

NumericUpDown.Value -= 1

        TextBox.Text=NumericUpDown.value
تتغير النتيجة في textbox و numericupdown




جرب هذا

لماذا تضع NumericUpDown.Value -= 1 إذا كنت لا تريد تغيير قيمتها ؟

RE: عدم تغيير قيمة NumericUpdown - Simo1991 - 09-10-18

قمت باستعمال متغير أخر يأخد قيمة numericupdown وهو الدي تجرى عليه العمليات الحسابية من بعد وبالتالي القيمة التي تظهر في خانة numericupdown تبقى تابتة

شكرا لكم