hi, i tried all combinations possible, i get the hasErrors to work only when there is more than 1 record in tb1. for the first record i add and press save, it goes into msgbox no. how can i refresh or somthing?

Private Sub Save(ByVal e As Object, ByVal er As EventArgs) Handles mySave.Click

If Me.ds.Tables(Me.tb1name).HasErrors Then

MsgBox("yes")

Else : MsgBox("no")

End If

End Sub

Private Sub Save(ByVal e As Object, ByVal er As EventArgs) Handles mySave.Click

' CompareTwoGridsForEquality()

'CompareCompleteness_of_grid2()

If Me.ds.Tables(Me.tb1name).GetErrors.Length > 0 Then

MsgBox("yes")

Else : MsgBox("no")

End If

End Sub

Private Sub checkCompletenessOfallRowsInGrid1()

Dim arRow(Me.DetailedInvoiceDGV.RowCount - 1) As DataGridViewRow

Me.DetailedInvoiceDGV.Rows.CopyTo(arRow, 0)

Array.ForEach(arRow, AddressOf verifyCompleteness)

End Sub

Private Sub verifyCompleteness(ByVal t As DataGridViewRow)

Dim arRow(t.Cells.Count - 1) As DataGridViewCell

Array.ForEach(arRow, AddressOf verifyEachCell)

End Sub

Private Sub verifyEachCell(ByVal c As DataGridViewCell)

Try

If IsDBNull(c.Value) Then

c.ErrorText = "Missing Text"

CType(c.OwningRow.DataBoundItem, DataRowView).Row.RowError = "Row Error"

Else

c.ErrorText = Nothing

End If

Catch ex As Exception

CType(c.OwningRow.DataBoundItem, DataRowView).Row.RowError = "Row Error"

End Try

End Sub

If Me.ds.Tables(Me.tb1name).HasErrors Then

MsgBox("yes")

Else : MsgBox("no")

End If

If Me.ds.Tables(Me.tb1name).HasErrors Then

MsgBox("yes")

Else : MsgBox("no")

End If