[أسامة]

3booody كتب :صح كلامك اخي لكن راح ينفذ الكود كثيرآ وبدون فائدة وشي ثاني بدل عبارة if هذا الكود اسهل

كود :

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Try
            TextBox4.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text) + CDbl(TextBox3.Text)
        Catch ex As Exception

        End Try

    End Sub

صح اخى اعتقد ان هذا الكود افضل لا يطلب اتخال الارقام فى جميع التكست بوكس

كود :

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Try
            If TextBox3.Text = "" Then
                TextBox4.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text)
            ElseIf TextBox2.Text = "" Then
                TextBox4.Text = CDbl(TextBox1.Text) + CDbl(TextBox3.Text)
            ElseIf TextBox1.Text = "" Then
                TextBox4.Text = CDbl(TextBox2.Text) + CDbl(TextBox3.Text)
            Else
                TextBox4.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text) + CDbl(TextBox3.Text)
            End If
        Catch ex As Exception

        End Try
    End Sub

alaqsa كتب :اخي عبوود حتى الكود ال>ي وضعته نفس المشكله لا بد منت ادخال جميع القيم في المربعات

اتمنى ايجاد الحل

لكم كل الشكر

تفضل اخى

كود :

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Try
            If TextBox3.Text = "" Then
                TextBox4.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text)
            ElseIf TextBox2.Text = "" Then
                TextBox4.Text = CDbl(TextBox1.Text) + CDbl(TextBox3.Text)
            ElseIf TextBox1.Text = "" Then
                TextBox4.Text = CDbl(TextBox2.Text) + CDbl(TextBox3.Text)
            Else
                TextBox4.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text) + CDbl(TextBox3.Text)
            End If
        Catch ex As Exception

        End Try
    End Sub

تم الاجابة فى هذا الموضوع http://vb4arb.com/vb/showthread.php?...D1%C7%D1/page2 ارجو ان يكون هذا هو المطلوب
استخدم كود @@أبورائد@@ فانه افضل بكثير