[السعيدي]

في الملف المرفق
عند القيام بعمليه حسابيه في اول تكس بكس يخرج الناتج في جميع التكس بكس الباقي
هل هناك لجعل الناتج يكتب في تكس بكس واحد ولا يتكرر
وهل هناك طريقه لتكرار العملية الجمع زو الضرب في تكس بكس عدد 2   فقط   بدل   8   تكس بكس

[larbihamri]

ارجو ان يكون هذا ما تريد الوصول اليه 

كود :

  Dim x, y As Double

       x = 0.05

       y = 20

       If TextBox1.Text <> "" Then
           TextBox2.Text = Val(TextBox1.Text) * x + y
       End If

       If TextBox3.Text <> "" Then
           TextBox4.Text = Val(TextBox3.Text) * x + y
       End If

       If TextBox5.Text <> "" Then
           TextBox6.Text = Val(TextBox5.Text) * x + y
       End If

       If TextBox7.Text <> "" Then
           TextBox8.Text = Val(TextBox7.Text) * x + y
       End If

[السعيدي]

الله يعطيك العافيه
هل ممكن ان نختصر ال8 تكس بكس ب 2 تكس بكس 
عن طريق التخزين في الذاكرة
حاولت ولم استطع

[larbihamri]

لم افهم مقصودك اخي
وضح اكثر

[السعيدي]

الله يعطيك العافيه
في المثال فيه عدد 8 نيكس بوكس
هل ممكن ان أخليهم عدد 2 تيكس بوكس
مع اجراء اكثر من عمليه حسابيه
وعند اجراء العملية  الحسابية
ناتج العمليه الأولي يخزن في الذاكرة
وعند عمليه ثانيه يعتمد علي الناتج الاول المخزن
وعند عمليه الثالثة يعتمد علي الناتج الثاني المخزن
وعند عمليه الرابعة يعتمد علي الناتج الثالث المخزن
وهكذا

[larbihamri]

حسب تصوري هذا ما تريد الوصول اليه 
الملف المرفق فيه التعديل ان شاء الله يكون المطلوب

[ديار الوطيفي]

شكرا...موضوع جيد

[السعيدي]

هذا المطلوب
والله يجزاك خير