[Rabeea Qbaha]

(28-09-17, 03:58 PM)Halim2008 كتب : السلام عليكم 
الرجاء المساعده فى لكي يظهر الناتج تلقائي فى تيكست بوكس رقم 18 


Public Class Form9

        Dim Number1 As Integer 
        Dim number2 As Integer
        Dim number3 As Integer 
        Dim answer As Integer 

Private Sub TextBox18_TextChanged( ByVal sender As System.Object,  ByVal e As System.EventArgs) Handles TextBox18.TextChanged
        Number1 = TextBox9.Text
        number2 = TextBox11.Text
        number3= TextBox13.Text
        answer = TextBox18.Text

        answer = Number1*number2/100 + Number1+number3

End Sub
End Class

صديقي الكود الخاص قيك سوف يظهر الناتج عندما يقوم المستخدم بالكتابه في TextBox18 
لكن انت تريد ان يظهر الناتج في 18.
اما ان تضع الكود في textbox13.textchanged او يكون لديك كبسه لحساب المجموع و اظهاره في textbox18
اما بالنسبه للعمليه الحسابيه عليك اولا اعطاء الاولويات عن طريق الاقواس 

تفضل :

كود :

       number1 = TextBox9.Text
       number2 = TextBox11.Text
       number3 = TextBox13.Text
       answer = (((number1 * number2) / 100) + (number1 + number3))

       TextBox18.Text = answer