[Dr.Sherif Alazizi]

(24-03-15, 12:59 AM)احمد عبد الحكيم كتب : شكرا لك اخى العزيز
لاكن المشكلة انى عند الطرح مثلا 1000 من 19000
النتيجه تصبح 17889

اخي احمد السبب في هذا هو مكان الكود

فانت يبدو انك وضعته في حدث TextChanged
وعند وضعه في هذا الحدث يقوم بانقاص القيمه من المربع الاول كلما غيرت القيمه وليس انقاص قيمة المربع بالكامل
فعند كتابة 1000 فانت لا تطرح 1000 بل تطرح 1 ثم 10 ثم 100 ثم 1000



بمعنى

اذا اضفت 2000 في المربع الاول
واضفت 1000 في المربع الثاني فالمفترض ان يقوم بكتابة 1000 في المربع الاول  صحيح ؟؟

لكن هنا لن يحدث ذلك

سيقوم هنا بانقاص 1 من 2000 ثم انقاص 10 من الناتج ثم انقاص 100 من الناتج  ثم انقاص 1000  من الناتج

فيصبح الظاهر لديك  ان ناتج طرح 1000 من 2000 هو 889

ولحل هذه المشكله  لو لم تريد كتابة الكود في زر

قم بكتابة الكود في حدث LostFocus

كود :

Private Sub TextBox2_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox2.LostFocus
       TextBox1.Text = Val(TextBox1.Text) - Val(TextBox2.Text)
   End Sub

بالتوفيق