منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : الجمع بنفس التاكست عدة مرات
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم .اخواني لدي 2 تاكست بكس 
تكست بكس 1 و تكست بكس 2 . اريد عندما اكتب رقم عشري بتاكست 1 و اضغط أنتر ينتقل العدد الى تاكست بكس 2 
و عندما اكتب رقم مرة اخرى ينضاف لقيمة العدد المكتوب باتاكست رقم 2 
مثال كتبت بتاكست بكس 1 الرقم 12.85 و ضغطت أنتر ينكتب الرقم 12.85 بالتاكست بكس 2
لما أكتب مرة اخرى العدد مثلا 4.22 بالتاكست بكس 1 و اضغط انتر يظهر بالتاكست 2 المجموع 17.07 و هكذا يعني جمع تراكمي و بارك الله فيكم
السلام عليكم ورحمة الله وبركاته
كل عام وانتم بخير - اضحى مبارك
اخي العيدروس تفضل
كود :
Private Sub TextBox1_KeyDown(sender As Object, e As KeyEventArgs) Handles TextBox1.KeyDown
       Dim kk As Double
       If e.KeyCode = Keys.Enter Then

           kk = Val(TextBox1.Text)
           TextBox1.Clear()
           TextBox1.Focus()
           TextBox2.Text = (Val(TextBox2.Text) + kk).ToString("0.00")
       End If
   End Sub
عيد اضحى مبارك اخ ابراهيم ايبو كل عام و انت بخير
بارك الله فيك و رزقك من حيث لا تحتسب فعلا هذا المطلوب بالضبط ربنا يجازيك كل خير يا رب