تقييم الموضوع :
  • 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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ارسال من التاكست بوكس الى الوورد حافظ حافظ 4 121 19-09-17, 12:09 PM
آخر رد: مصمم هاوي
  لديا قيمة في تاكست بوكس اريد تحويلها wolf1120 2 89 14-09-17, 07:20 PM
آخر رد: wolf1120
  تغيير لون تاكست بوكس عند سن معين بوزوينة علي 1 111 04-07-17, 02:06 AM
آخر رد: Ahmed_Mansoor
  سؤال أريد أن أكتب رقم الزبون في التكست بوكس وأعرض فواتير الزبون في التقرير فيصل علي 2 206 08-05-17, 08:57 PM
آخر رد: فيصل علي
  ارجو المساعدة في اقرب وقت (حول ملأ الكمبو بوكس من جدول في قاعدة البيانات) larbihamri 6 301 01-05-17, 03:06 PM
آخر رد: mosamosa
  مشكلة في حفظ البيانات عن طريق الليست بوكس مصمم هاوي 3 214 28-04-17, 05:23 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] طريقة جمع أو ضرب أرقام موجودة وسط نص فى التيكست بوكس copy77 11 623 27-01-17, 03:31 PM
آخر رد: copy77
  [ تمّ الحل ] :الحذف مع التّأكيد بواسطة التشيك بوكس عبد العزيز البسكري 4 443 27-01-17, 02:59 PM
آخر رد: عبد العزيز البسكري
  [vb6.0] عند الكتابة في التكست بوكس تكون الفورمة مثل التقويم الميلادي larbihamri 4 468 15-01-17, 12:41 AM
آخر رد: larbihamri
  [ تمّ الحل ] : مجموع الصف داخل الفليكس جريد عبد العزيز البسكري 4 346 13-12-16, 04:53 AM
آخر رد: عبد العزيز البسكري

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


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