UpdateBatch error When Delete Rows

[Giovanni pepe]

This is my error :
<<impossible to approach the information on the line eliminated through the line>>

This is my code for updateBatch :

Private mSqlConn as sqlConnection

Public Function UpdateBatch(ByV al DTable As DataTable)
Dim mSqlDa As SqlDataAdapter
Dim MustCloseConnec tion As Boolean
Dim mDtable As DataTable
Dim mSqlCmd As New SqlCommand("SEL ECT * FROM TBL" & DTable.TableNam e, mSqlConn)
mSqlCmd.Command Type = CommandType.Tex t
mSqlDa = New SqlDataAdapter( mSqlCmd)
mSqlDa.FillSche ma(DTable, SchemaType.Sour ce)
Dim cmdBuilder As New SqlCommandBuild er(mSqlDa)
mSqlDa.InsertCo mmand = cmdBuilder.GetI nsertCommand
mSqlDa.DeleteCo mmand = cmdBuilder.GetD eleteCommand
mSqlDa.UpdateCo mmand = cmdBuilder.GetU pdateCommand
mSqlDa.Update(D Table)
mSqlDa.Dispose( )
mSqlCmd.Dispose ()
End Function

In my datatable i insert data and deletedata

Procedure Insert Data in a datatable :
'-----------------------------------------------------------
private sub InsertDtRow
DtRow = DTable .NewRow
DtRow("C1") = txt1.text -PRIMARY KEY
DtRow("C2") = txt2.text - PRIMARY KEY
DtRow("C3") = txt3.text
DtRow("C4") = txt4.text
DtRow("C5") =txt5.text
DTable .Rows.Add(DtRow )
DtRow = Nothing
end sub
'-------------------------------------------------------------

'Procedure delete data in a datatable
'----------------------------------------------------------------
private sub DeleteDtRow
Dim DtRow() As DataRow
DtRow = DTable .Select("C1=1 AND C2 = 2")

If DtRow.GetUpperB ound(0) <> -1 Then
DtRow(0).Delete ()
End If
end sub
'----------------------------------------------------------------

to the end I call UpdateBatch(DtT able) for update my table in db....