حذف از Datagridview

[schweiz]

سلام دوست عزیز ببخشید خیلی دیر شد
سورس من اینه ولی نمیدونم درسته اما اول جواب میداد ولی برنامه که خراب شد دومرتبه نوشتم جواب نداد
البته این سورس من ساده هستش ولی من میخواهم از خود Datagridview حذف کنم ممنون میشم کمکم کنید.

Dim con As New OleDb.OleDbConnection

con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=MR.mdb"

Dim cmd As New OleDb.OleDbCommand

strsql = "delete from MTR where Koderanandeh like '" + Me.DataGridView1.CurrentCell.RowIndex + "'"

cmd.CommandType = CommandType.Text

con.Open()

cmd.ExecuteNonQuery()

con.Close()

ds.Clear()

da.Fill(ds)

da = New OleDb.OleDbDataAdapter("select * from MTR", con)

Me.DataGridView1.DataSource = ds.Tables(0)