[ابراهيم ايبو]

السلام عليكم اخي الكريم

تفضل التعديل على كود الأخ سامي جزاه الله خيرا

كود :

   Dim aa As Integer = Val(Form2.TextBox1.Text)
       Form2.TextBox1.Text = aa + Val(TextBox1.Text)
       Form2.Show()

واذا احببت جعل التكست في الفورم 2 بـ صفر وقتما تريد

ضع هذا الكود التالي في زر أخر

كود :

Form2.TextBox1.Text = 0