Eliminare su un DataGrid con " comm.GetDeleteCommand.Co

[race2]

Mi puoi dire una cosa a riguardo di questo???

-------------------------------------------------------------------------------

Private conn As String = "Data Source=localhost;Initial Catalog=pubs;Integrated Security=SSPI;"
Private ds As DataSet

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim dap As SqlDataAdapter = New SqlDataAdapter("SELECT * FROM authors ORDER BY au_lname, au_fname", conn)
dap.TableMappings.Add("Table", "authors")
ds = New DataSet()
dap.Fill(ds)

grd.DataSource = ds.Tables("authors")

End Sub
-------------------------------------------------------------------------------

A questo punto mi ritrovo un DataGrid popolato di dati.

Ora io vorrei " INSERIRE, MODIFICARE, ELIMINARE " dei dati, e quindi ho fatto questo:

-------------------------------------------------------------------------------

Private Sub btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn.Click

If ds.HasChanges() Then

Dim dap As SqlDataAdapter
Dim comm As SqlCommandBuilder

dap = New SqlDataAdapter("SELECT * FROM authors ORDER BY au_lname, au_fname", conn)
dap.TableMappings.Add("Table", "authors")

'esegue i comandi
comm = New SqlCommandBuilder(dap)

Debug.WriteLine("*** INSERT ***")
Debug.WriteLine(comm.GetInsertCommand.CommandText)
Debug.WriteLine("*** UPDATE ***")
Debug.WriteLine(comm.GetUpdateCommand.CommandText)
Debug.WriteLine("*** DELETE ***")
Debug.WriteLine(comm.GetDeleteCommand.CommandText)

dap.Update(ds)
End If

End Sub

--------------------------------------------------------------------------------

sono arrivato a " INSERIRE, MODIFICARE " ma " ELIMINARE " non so come fare.
Cosa devo fare nel DataGrid del form una volta che il progetto e' in esecuzione per " ELIMINARE " ???