تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مجموع خاص بتاكست بوكس
#1
تحيتي لكل الاخوة و الساتذة القائمين على المنتدي
هل من مساعدتي لطفا منكم بهذه المشكلة
عندي تكست1 و تكست 2
أكتب بتكست 1 مثلا الرقم 400 تظهر بتكست 2 العدد 400 ..ثم أكتب بتكست1 مثلا 25.36 تظهر بتكست 2 العدد 425.36
وهكذا .. كل مكتب رقم بتكست 1 ينضاف للمجموع بتكست 2
اسمحولي ادا اتعبتكم معايا
برك الله فكم مقدما
الرد }}}
تم الشكر بواسطة:
#2
إستخدم هذا الكود
Private Sub TextBox1_Change()
Dim lo As Single
lo = Val(TextBox1.Text)
If lo = 1 Then
TextBox2.Text = 400
Else
TextBox2.Text = 400 + (lo)
End If
End Sub
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , Ahmed_Mansoor
#3
شكرا اخي للمساعدة
لكن للاسف ليس هذا مأريده
التكست2 هي للمجموع كل مكتب رقم بتكست1 واضغط انتر ينضاف للمجموع بالتكست2
اشرحلك اكثر
اكتب في تكست1 الرقم 100 مثلا تظهر بتكست 2 الرقم 100 ، بعدين لما اكتب مثلا بتكست 1 الرقم 200 واضغذ انتر تظهر بتكست 2 المجموع 300 .اكتب بعدين مثلا بتكست 1 الرقم 500.96 واضغط انتلر تظهر بتكست2 الرقم 800.96
يعني ديما التاكست 2 للمجموع لما ادخل رقم اي رقم بتكست 1 واضغذانتير ينضاف للمجموع بتكست2
نقدر نخلي كومند 1 بدلا من الضغط انتر
تشكراتي
الرد }}}
تم الشكر بواسطة:
#4
أضف كوماند وكتب الكود التالي:-
Public sa As Single

Private Sub CommandButton1_Click()
Dim lo As Single
TextBox2.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
End Sub
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , Ahmed_Mansoor
#5
نعم شكرا هذا هو المطلوب
بارك الله فيك وتقبل تحياتي
شكرا
الرد }}}
تم الشكر بواسطة: Ahmed_Mansoor


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] عند فتح الكومبو بوكس تظهر فيها جميع اسماء الزبائن وادي العوضي 3 352 27-11-23, 01:05 AM
آخر رد: وادي العوضي
  [سؤال] التيكست بوكس Abdellah 2 389 18-11-23, 10:55 AM
آخر رد: Abdellah
  [سؤال] كود عدم تكرار الداتا المستعدة فى الكومبو بوكس mostafa fricool 6 6,063 09-02-23, 02:10 PM
آخر رد: ahlan_32
  استفسار اخوتي بخصوص التيكست بوكس او الليست بوكس عبدالمؤمن 2 474 27-11-22, 08:51 PM
آخر رد: عبدالمؤمن
  [vb6.0] ادخال الاسم في الكومبو بوكس ويحفظ في الكومبو بوكس وادي العوضي 3 867 15-06-22, 01:56 AM
آخر رد: ahmedabdelaliem
  [vb6.0] اضافة الاسماء في الليست بوكس وظهور البيانات مثل الكريدفيو وادي العوضي 6 1,310 04-06-22, 09:42 PM
آخر رد: مصمم هاوي
  [vb6.0] اختيار اسم الزبون من الكومبو بوكس لغرض طباعة تقريره وادي العوضي 4 1,294 15-01-22, 06:13 PM
آخر رد: وادي العوضي
  [vb6.0] طلب : رسالة أن العنصر مكرر بالليست بوكس ولا يمكن إضافته مرة أخرى hamada salah90 2 1,264 05-12-21, 12:04 AM
آخر رد: hamada salah90
  ربط تكست بوكس بالتاريخ الهجري الموجود في صفحة انترنت؟ Alhootti1 5 1,900 30-08-21, 11:18 PM
آخر رد: Alhootti1
  مساعدة في كود تفريغ بيانات الكومبوكس والليست بوكس مصمم هاوي 4 2,413 13-09-20, 03:57 AM
آخر رد: مصمم هاوي

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


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