[VB6] Eliminare riga selezionata da DataGrid

[zorro77]

Salve a tutti, sto cercando di cancellare una riga di un datagrid con un bottone, ma non riesco a trovare il metodo da utilizzare per eliminare la riga selezionata....AllowDelete l'ho messo a true....

[mgmg]

Ho paura che non si riescano ad utilizzare gli eventi della grid, ma si può cancellare la riga selezionata semplicemente utilizzando la delete sul recordset associato alla griglia. Logicamente la griglia deve essere associata al recordset (a form load o in altro evento) a runtime in questo modo:

    Str = "select * from Tabella"
    If Rs.State = 1 Then Rs.Close
    Rs.CursorLocation = adUseClient
    Rs.Open Str, cn, adOpenKeyset, adLockOptimistic
    Set DataGrid1.DataSource = Rs

Private Sub Command1_Click()
  If MsgBox("Confermi la cancellazione del record selezionato?", vbQuestion + vbYesNo + vbDefaultButton2, "Conferma") = vbYes Then

    If DataGrid1.RecordCount > 0 Then
        Rs.Delete
    End If

  End If 
End Sub