[Dr.Sherif Alazizi]

اخي احمد

ايا كانت عمليات الطرح والفكره المطلوبه

انا كنت احاول حل مشكلة عملية الطرح داخل حدث TextChanged وبعيدا عن حدث LostFocus

وحل مشكلة الـ ( - ) التي تظهر لك خلال سؤالك بالاعلى

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

قم بتطويع الكود الان لما تحبه

الفكره هي فقط تعريف متغير وتحميله القيمه خلال الكتابه لتتم عملية الطرح بشكل طبيعي ثم تنظيفه من الذاكره

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

قم باضافة العملية الحسابيه الثانيه
TextBox2.Text = Val(TextBox2.Text) - Val(TextBox3.Text)

تحت العملية الحسابيه الاولى
TextBox2.Text = Val(TextBox1.Text) - Val(TextBox3.Text)

بحيث يكون الكود

x = Val(TextBox3.Text)
TextBox2.Text = Val(TextBox1.Text) - Val(TextBox3.Text)
TextBox2.Text = Val(TextBox2.Text) - Val(TextBox3.Text)
x = Nothing


لكن على ما فهمت
سيكون ناتج طرح 1000 من 20000 هو 18000


لكن في حالة كان لك فكره لم تصل لي

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

فمثلا
مربع السعر الاصلي نجعله SalaryTxt
مربع الخصم نجعله DiscountTxt
مربع الباقي نجعله RemainTxt

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