تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] نقل القيمة من textbox الى اخر
#1
السلام عليكم ورحمة الله وبركاته

عندي نموذجين
الاول يوجد به تكست بوكس وزر امر

وفي الثاني تكست بوكس

اريد نقل قيمة التكست بوكس الى النموذج الاخر مع زيادة واحد 

جربت التالي

بوضعه في زر الامر

Dim x As Integer
        If Me.TextBox1.Text = x Then Form2.TextBox1.Text = x + 1

        ()Form2.Show

ولكن لم تنجح الطريقة
الرد }}}
تم الشكر بواسطة:
#2
انا لم اعلن عن المتغير

شكرا لكم
الرد }}}
تم الشكر بواسطة:
#3
ضع قيمة افتراضية لـx
الرد }}}
تم الشكر بواسطة:
#4
اخي سعود
اشكرك على اجابتك
ونطمع بالمزيد من علمك

النموذجين يوجد بهما اثنان تكست بوكس
والمطلوب هو
عند ادخال رقم تكون النتيجه في الفورم الثاني نفس الرقم الموجود في الفورم الاول زائد واحد
على ان تكون الارقام من 00 الى 99 ومن ثم الرجوع الى 00 وليس 100

مثلا اذا كان 00 فتكون 01 واذا كانت 99 تكون النتيجه في الفورم الثاني 00
و 09 تكون 10 و 90 تكون91 وهكذا


استخدمت التالي
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x As Integer
Dim r As Integer
x = TextBox1.Text
r = TextBox2.Text
If Me.TextBox1.Text = x Then Form2.TextBox1.Text = x
If Me.TextBox2.Text = r Then Form2.TextBox2.Text = r + 1
If Me.TextBox1.Text = 9 Then Form2.TextBox1.Text = 0
If Me.TextBox2.Text = 9 Then Form2.TextBox2.Text = 0
Form2.Show()
End Sub
الرد }}}
تم الشكر بواسطة:
#5
يا اكسبلورر،

تحليل الكود اللي في موضوعك:

Dim x As Integer
هنا تم تعيين متغير x وقيمته (صفر) لأنه لم تعين له قيمة أخرى

If Me.TextBox1.Text = x Then Form2.TextBox1.Text = x + 1
هنا تم وضع شرط وهو عندما تكون قيمة Me.TextBox1.Text تساوي x والتي سوف يكون المتغير (صفر) دائما.

السؤال: متى سوف تتغير قيمة x

أتركك للتفكير.......




تحليل الكود اللي في ردك السابق:

Dim x As Integer
Dim r As Integer
هنا تم تعيين متغير x وr وقيمتهها (صفر) لأنه لم تعين له قيمة أخرى

x = TextBox1.Text
r = TextBox2.Text
هما تم تعيين قيمة للمتغيرين x وr من TextBox1.Text وTextBox2.Text مع أنها نصية وليست رقمية والمفروض تحويلها لتلافي الخطأ

If Me.TextBox1.Text = x Then Form2.TextBox1.Text = x
If Me.TextBox2.Text = r Then Form2.TextBox2.Text = r + 1
هنا تم وضع شرط وهو عندما تكون قيمة Me.TextBox1.Text تساوي x والتي سوف يكون المتغيران تساوي TextBox دائما.

السؤال هنا: ما فائدة هذا الشرط طالما سيساويان نفس القيم؟

If Me.TextBox1.Text = 9 Then Form2.TextBox1.Text = 0
If Me.TextBox2.Text = 9 Then Form2.TextBox2.Text = 0
هنا تم وضع شرط وهو عندما تكون قيمة Me.TextBox تساوي 9 يتم وضع (صفر).

أتركك للتفكير..........




البرمجة هي ترتيب منطقي....
الرد }}}
تم الشكر بواسطة:
#6
مرحبا بك اخي الوادي

اجابة لسؤالك الاول
تتغير قيمة x اذا كانت تساوي 9 و r = 9 اما اذا r لاتساوي 9 فان x لا تتغير

اجابة سؤالك الثاني
انا اردت نقل القيمه فقط
الشرط لا فائدة منه (مبتدئ)

عزيزي
اريد الطريقة التي تجعل قيمه 99 في الفورم الاول 00 في الفورم الثاني
مع العلم بانهم اثنان تكست بوكس في كل فورم

55 يكون 56
89 يكون 90
99 يكون 00
وهكذا
تحياتي لكم
الرد }}}
تم الشكر بواسطة:
#7
السلام عليكم

الرجاء الرد على سؤالي ولكم من الشكر اجزله

اريد الطريقة التي تجعل قيمه 99 في الفورم الاول 00 في الفورم الثاني
مع العلم بانهم اثنان تكست بوكس في كل فورم

55 يكون 56
89 يكون 90
99 يكون 00
وهكذا
تحياتي لكم
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مشكلة ظهور textbox بعد حذفه من الفورم مبرمج صغير 1 1 221 27-01-24, 02:04 AM
آخر رد: مبرمج صغير 1
  التحقق من خلال محتوى خلية عن طريق textbox صالح عبدالله 2 222 24-01-24, 12:54 PM
آخر رد: صالح عبدالله
  [VB.NET] استدعاء بيانات في TextBox بناء على combobox loay775 2 264 18-01-24, 05:07 PM
آخر رد: loay775
  إدخال معادلة رياضية في textBox وبرمجة حلها؟ الخير19 3 299 03-01-24, 04:19 PM
آخر رد: الخير19
  كيف أقوم بنقل محتويات checkedListbox إلى Textbox ؟ صالح عبدالله 4 483 16-09-23, 10:51 AM
آخر رد: أبو خالد الشكري
  textbox aymen_libya 11 1,545 23-08-23, 12:20 PM
آخر رد: ahmed_king2023
  اريد التعديل على كود اذا كان القيمة المدخلة مكررة بDataGridView يتم فقط زيادة العدد moh61 6 821 26-07-23, 10:41 AM
آخر رد: تركي الحلواني
  كيفية نقل بيانات من Textbox الى الجريدفيو بالترتيب؟؟ abu7shihab 4 532 25-07-23, 09:46 PM
آخر رد: aljzazy
  اريد كود لمسح النص من textbox بمجرد الضغط على ال textebox للكتابة رهف العريفي 21 11,883 03-06-23, 04:56 AM
آخر رد: سعود
  كيفية الربط بين textbox و listbox timgad 2 3,648 27-03-23, 01:59 PM
آخر رد: sanyor77

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم