Como eliminar registros desde un listview y de la BD

Buenos días Experto,
Necesito de tu ayuda, tengo un programita en VB 6.0 conectado a una BD Access, tengo un formulario con un listview, unos textbox para introducir los datos y botones para guardar esos datos, lo que quiero hacer es, poder eliminar los registros que veo desde el listview y aparte de que se eliminen del listview también se eliminen de la BD, esta es sentencia que he utilizado pero no consigo eliminar los datos de la BD, si se borran del listview pero no de la BD.
Desde ya muchas Gracias.
Private Sub ListView1_DblClick()
If Not ListView1.SelectedItem Is Nothing Then
    If MsgBox("Desea Elimar Registro?", vbQuestion + vbYesNo) = vbYes Then
        ListView1.ListItems.Remove (ListView1.SelectedItem.Index)
            Dim rs As String
                indice = ListView1.SelectedItem
                rs = " delete NOMBRE, APELLIDO, TELEFONO from REG_HNO where ID_HNO = indice"
               cn.Execute (rs)
    End If
End If
Me da el siguiente error, no se han especificado valores para algunos de los parámetros requeridos, y al darle Depurar me muestra el con.Execute (rs)