السلام عليكم
اخواني الكرام
انا لدي اربعه textbox
اريد ان اضعط ارقام في التكس بوك الاول والثاني والثالث
ويخرج الناتج مباشره في التكس بوكس الرابع الى هوه عباره عن جمع الثلاث ارقام
اتمنى وضع الكود الخاص به
وشكرا جزيلا لاكم
اذا اردت الناتج مع الكسور ضع هذا الكود
كود :
TextBox4.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text) + CDbl(TextBox3.Text)
واذا اردت من غير كسور غير كلمات CDbl الى Cint
اخي الكريم عبوودي
اتمنى اخباري ان يتم وضع الكود هل في حدث laod
ام اين بالضبط لانه لم يعمل معي في حدث load
وشكرا جزيلا لك
ضعه في في حدث الضغط علي زر أمر
اخي العزيز الكريم Kslawy
ولكن انا في برنامجي لا يوجد زر امر للجمع
انا اريد ان يجمع تلقائيا بمجرد وضع الرقم يقوم بالجمع
مباشره
اتمنى تكون الفكره وصلت
[COLOR="#800000"]
اخي غير ممكن الجمع مباشرة عند كتابة الارقام لازم يكون في شرط معين مثلآ عند الضغط على إنتر او اذا كان رقم واحد او رقمين مثلآ
هذا الكود يتم تنفيذه عند الضغط على التكست رقم 4[/COLOR]
كود :
Private Sub TextBox4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox4.Click
TextBox4.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text) + CDbl(TextBox3.Text)
End Sub
تعديل على كود الاخ 3booody اذا لم يمانع
اضف Timer واعمل Enabled = True
ثم اضف هذا الكود فى حدث التيمر
كود :
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If TextBox1.Text = "" Or TextBox2.Text = "" Or TextBox3.Text = "" Then
TextBox4.Text = ""
Else
TextBox4.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text) + CDbl(TextBox3.Text)
End If
End Sub
إقتباس :تعديل على كود الاخ 3booody اذا لم يمانع
اضف Timer واعمل Enabled = True
ثم اضف هذا الكود فى حدث التيمر
صح كلامك اخي لكن راح ينفذ الكود كثيرآ وبدون فائدة وشي ثاني بدل عبارة 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
اخي الكريم عبوووود شكرا جزيلا لك
اخي العزيز والكريم اسامه
نعم
هذا ما اريده بالضبط
ولكن هناك مشكله بسيطه
هذا الكود يلزمك ان تقوم بتعبأت كل البيانات
فمثلا لو اردت ان اضيف في التيكس بوكس 1 والتكيس بوكس 2 ولا اريد اضافه اي قيمه في الثالثه فانه لا يقوم بالعمليه لانه احيانا تكون العمليه تحتوى على رقمين فتح اريد الجمع بينهم واحيانا ثلاثه
اتمنى اجد حل لهذه المشكله
اخي عبوود حتى الكود ال>ي وضعته نفس المشكله لا بد منت ادخال جميع القيم في المربعات
اتمنى ايجاد الحل
لكم كل الشكر