+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : الجمع بنفس التاكست عدة مرات (/showthread.php?tid=39018)
الجمع بنفس التاكست عدة مرات - العيدروس - 19-07-21
السلام عليكم .اخواني لدي 2 تاكست بكس
تكست بكس 1 و تكست بكس 2 . اريد عندما اكتب رقم عشري بتاكست 1 و اضغط أنتر ينتقل العدد الى تاكست بكس 2
و عندما اكتب رقم مرة اخرى ينضاف لقيمة العدد المكتوب باتاكست رقم 2
مثال كتبت بتاكست بكس 1 الرقم 12.85 و ضغطت أنتر ينكتب الرقم 12.85 بالتاكست بكس 2
لما أكتب مرة اخرى العدد مثلا 4.22 بالتاكست بكس 1 و اضغط انتر يظهر بالتاكست 2 المجموع 17.07 و هكذا يعني جمع تراكمي و بارك الله فيكم
RE: الجمع بنفس التاكست عدة مرات - ابراهيم ايبو - 19-07-21
السلام عليكم ورحمة الله وبركاته
كل عام وانتم بخير - اضحى مبارك
اخي العيدروس تفضل
كود :
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 SubRE: الجمع بنفس التاكست عدة مرات - العيدروس - 20-07-21
عيد اضحى مبارك اخ ابراهيم ايبو كل عام و انت بخير
بارك الله فيك و رزقك من حيث لا تحتسب فعلا هذا المطلوب بالضبط ربنا يجازيك كل خير يا رب