في الملف المرفق
عند القيام بعمليه حسابيه في اول تكس بكس يخرج الناتج في جميع التكس بكس الباقي
هل هناك لجعل الناتج يكتب في تكس بكس واحد ولا يتكرر
وهل هناك طريقه لتكرار العملية الجمع زو الضرب في تكس بكس عدد 2 فقط بدل 8 تكس بكس
ارجو ان يكون هذا ما تريد الوصول اليه
كود :
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 تكس بكس
عن طريق التخزين في الذاكرة
حاولت ولم استطع
لم افهم مقصودك اخي
وضح اكثر
الله يعطيك العافيه
في المثال فيه عدد 8 نيكس بوكس
هل ممكن ان أخليهم عدد 2 تيكس بوكس
مع اجراء اكثر من عمليه حسابيه
وعند اجراء العملية الحسابية
ناتج العمليه الأولي يخزن في الذاكرة
وعند عمليه ثانيه يعتمد علي الناتج الاول المخزن
وعند عمليه الثالثة يعتمد علي الناتج الثاني المخزن
وعند عمليه الرابعة يعتمد علي الناتج الثالث المخزن
وهكذا
حسب تصوري هذا ما تريد الوصول اليه
الملف المرفق فيه التعديل ان شاء الله يكون المطلوب
هذا المطلوب
والله يجزاك خير