Visual Basic

Public Sub DeleteRowFromGrid(ByVal intRowNo As Integer)<br />
       EmployeeDS.Tables("Employee").Rows(intRowNo).Item("RowState") = "deleted"<br />
   End Sub<br />
<br />
   Public Sub ReBindData()<br />
       Dim objDataView As New DataView<br />
       objDataView.Table = EmployeeDS.Tables("Employee")<br />
       objDataView.RowFilter = "RowState<>'deleted'"<br />
       dgDetails.DataSource = objDataView<br />
   End Sub<br />
<br />
   Private Sub btnDeleteRow_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDeleteRow.Click<br />
       Dim intRowNo As Integer<br />
       intRowNo = Val(InputBox("Please Enter Row Number to Delete"))<br />
       If IsNumeric(intRowNo) Then<br />
           DeleteRowFromGrid(intRowNo)<br />
           ReBindData()<br />
           MsgBox("Deleted Row Number :" & intRowNo.ToString() & " Succsfully.")<br />
       Else<br />
           MsgBox("Please enter an Number")<br />
       End If<br />
   End Sub

SELECT someField, someField, someField
FROM someTable
WHERE someIdField = someIdValue