منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مساعدة في كود عملية حسابية - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : مساعدة في كود عملية حسابية (/showthread.php?tid=10892)



مساعدة في كود عملية حسابية - Microsoft Visual Basic 6.0 - 10-12-14

                   السلام عليكم 


      اخواني في الله

           اريد عمل ألة حسابية  تقوم بحساب المجموع والقسمة والحصول على النسبة المؤوية


                      وأريد ان تحسب مباشرة يعني بمجرد كتابة داخل تكست بوكس تعمل تلقائيا بدون كوموند
 

                                    أرفقت مثال أرجو التعديل عليه


                                    أرجو المساعدة وبارك الله فيكم

                                           
              

        
      


RE: مساعدة في كود عملية حسابية - abulayth - 10-12-14

السلام عليكم

اخي الكريم بامكانك الاستفادة من هذا الرابط

http://vb4arb.com/vb/thread-186.html

يعطيك العافية


RE: مساعدة في كود عملية حسابية - السيد الغالي - 10-12-14

السلام عليكم
اي تكست بوكس تقصد ؟ هل تقصد تكست المجموع ؟
ارجو التوضيح
تحياتي لك


RE: مساعدة في كود عملية حسابية - Microsoft Visual Basic 6.0 - 10-12-14

شكرا أخي  (السيد الغالي)

        يوجد    تكست بوكس  (01)  يمثل قيمة المبلغ الاول
                و  تكست بوكس   (02) يمثل قيمة المبلغ الثاني
               و   تكست بوكس   (03) يمثل قيمة المبلغ الثاني  
         
              و  تكست بوكس   (04) يمثل قيمة المبلغ المجموع             
                و  تكست بوكس   (05) يمثل قيمة المبلغ الصفقة

             أريد عند كتابة قيمة المبلغ الاول وقيمة المبلغ الثاني أو قيمة المبغ الثالث  يظهر مجموع في تكست بوكس (04)
             
            وعند كتابة قيمة المبلغ الصفقة تظهر النسبة المؤوية في تكست بوكس (06)

          
             حيث قيمة النسبة المؤوية تساوي قيمة المجموع قسمة عل قيمة مبلغ الصفقة ضرب 100

           

                   


RE: مساعدة في كود عملية حسابية - abulayth - 10-12-14

السلام عليكم

ان شاء الله طلبك يكون في المرفقات

يعطيك العافية


RE: مساعدة في كود عملية حسابية - السيد الغالي - 10-12-14

السلام عليكم
بعد رد استاذنا abulayth لايوجد لدي رد سوى الشكر والتقدير له وشكري موصول لك ايضا
تحياتي لك


RE: مساعدة في كود عملية حسابية - Microsoft Visual Basic 6.0 - 10-12-14

   
     نعم هذا هو طلبي
         
 شكرا  وبارك  الله فيكم  أخوتي  على المساعدة
         
            تاحياتي لكم

         


RE: مساعدة في كود عملية حسابية - اسلام الكبابى - 17-12-14

تعديل لخطأ سهو  بسيط

Text6 = "%" & (Val(Text4.Text) / Val(Text5)) * 100