منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
تعديل على خلية الداتاجريد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=34317)

تعديل على خلية الداتاجريد - محمد خيري - 14-04-20

السلام عليكم.اخواني ارجو المساعدة . بالفورم1 عندي داتاجريد لما اضغط عليه بالخلية 4 يظهر الفورم 2 لاقوم بتغيير كمية على داتاجريد الفورم1 الخلية 4
بالفورم 2 عندي زر و تاكست بكس و هذا الكود يلي بالفورم 2 هو يشتغل لكن يعدل كل الخلايا رقم 4 بداتاجريد الفورم1 و انا اريد اعدل فقط على خلية السطر الواقف عليه لاضيف عليه العدد يلي اكتبه بالتاكست بكس Txtinvoiceqty
اذا كان بالداتاجريد كان مكتوب العدد 3 و كتبت بالفورم 2 العدد 5 تصير الكمية على الداتاجريد 8
كود زر الامر بالفورم  2


كود :
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       For M As Integer = 0 To Form1.DataGridView1.Rows.Count - 1
           Dim New_Qty As Integer = Val(Me.TxtInvoiceQty.Text) + Val(Form1.DataGridView1.CurrentRow.Cells(4).Value.ToString())
           Form1.DataGridView1.Rows(M).Cells(4).Value = New_Qty
           Call Form1.Calculatoor()
       Next
       Me.Dispose()
   End Sub

شكرا و بارك الله فيكم

RE: تعديل على خلية الداتاجريد - ابراهيم ايبو - 14-04-20

السلام عليكم اخي محمد 
حسب مافهمت من سؤالك لديك فورم وفيها داتاغرايد عندما تضغط دبل كليك على خلية السعر مثلا يظهر فورم2 وفيه تكست بوكس نكتب فيه رقم وعند الضغظ على البوتون يغلق الفورم2 والخلية التي نقرنا عليها يضاف اليها ماكتبناه في التكست بوكس للفورم الثاني 
ان كان هذا قصدك اليك الاكواد
كود الفورم الاول حدث دبل كليك للداتاغرايد
كود :
 '  كود الفورم الاول - الجاتا غرايد حدث دبل كليك
   Private Sub DataGridView1_DoubleClick(sender As Object, e As EventArgs) Handles DataGridView1.DoubleClick
       Dim frm As New Form2()
       frm.ShowDialog()
       Me.DataGridView1.CurrentRow.Cells(3).Value += Convert.ToInt32(frm.TextBox1.Text)
   End Sub
 كود الفورم2 فقط اغلاق الفورم عن طريق البوتون
كود :
'  كود الفورم الثاني في البوتون
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Me.Close()
   End Sub


RE: تعديل على خلية الداتاجريد - محمد خيري - 14-04-20

(14-04-20, 07:05 AM)ابراهيم ايبو كتب : السلام عليكم اخي محمد 
حسب مافهمت من سؤالك لديك فورم وفيها داتاغرايد عندما تضغط دبل كليك على خلية السعر مثلا يظهر فورم2 وفيه تكست بوكس نكتب فيه رقم وعند الضغظ على البوتون يغلق الفورم2 والخلية التي نقرنا عليها يضاف اليها ماكتبناه في التكست بوكس للفورم الثاني 
ان كان هذا قصدك اليك الاكواد
كود الفورم الاول حدث دبل كليك للداتاغرايد
كود :
 '  كود الفورم الاول - الجاتا غرايد حدث دبل كليك
   Private Sub DataGridView1_DoubleClick(sender As Object, e As EventArgs) Handles DataGridView1.DoubleClick
       Dim frm As New Form2()
       frm.ShowDialog()
       Me.DataGridView1.CurrentRow.Cells(3).Value += Convert.ToInt32(frm.TextBox1.Text)
   End Sub
 كود الفورم2 فقط اغلاق الفورم عن طريق البوتون
كود :
'  كود الفورم الثاني في البوتون
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Me.Close()
   End Sub

جزاك الله خيرا و بارك فيك


RE: تعديل على خلية الداتاجريد - ابراهيم ايبو - 14-04-20

الحمد لله والشكر لله
ولك اخي محمد خير الجزاء