30-10-19, 06:24 PM
(آخر تعديل لهذه المشاركة : 30-10-19, 06:28 PM {2} بواسطة asemshahen5.)
PHP كود :
Dim row As DataRow = dt.NewRow
For i As Integer = 0 To dgvSale.Rows.Count - 1
If dgv1.CurrentRow.Cells(0).Value = dgvSale.Rows(i).Cells(0).Value Then
' 'MsgBox("الصنف موجود", MsgBoxStyle.Exclamation, "تنبيه")
dgvSale.Rows(i).Cells(3).Value += 1
dgvSale.Rows(i).Cells(4).Value = Val(dgvSale.Rows(i).Cells(3).Value * dgvSale.Rows(i).Cells(2).Value)
dgvSale.AllowUserToAddRows = False
' 'dgvSale.DataSource = dt
total += dgvSale.Rows(i).Cells(4).Value
txtTotal.Text = total
txtBBO.Text = Val(txtDDO.Text) - Val(txtTotal.Text)
txtClearSales()
dgvSale.Rows(i).Selected = True
Exit Sub
End If
Next
row(0) = Me.dgv1.CurrentRow.Cells(0).Value
row(1) = Me.dgv1.CurrentRow.Cells(1).Value
row(2) = Me.dgv1.CurrentRow.Cells(2).Value
row(3) = 1
row(4) = 1 * dgv1.CurrentRow.Cells(2).Value
dt.Rows.Add(row)
For i As Integer = 0 To dgvSale.Rows.Count - 1
total += dgvSale.Rows(i).Cells(4).Value
Next
txtTotal.Text = total
txtBBO.Text = Val(txtDDO.Text) - Val(txtTotal.Text)
dgvSale.CurrentCell = dgvSale.Rows(dgvSale.RowCount - 1).Cells(0)
dgvSale.Rows(dgvSale.RowCount - 1).Selected = True
عندي سؤال لماذا تستخدم : dgvSale.DataSource = dt في اللوب .
او ضع مثالا مصغرا في المرفقات
سبحان الله وبحمده سبحان الله العظيم و الحمد لله ولا اله الا الله والله اكبر
