Problemas para actualizar datos

[samyy_g]

Hola a todos, agradeceria a quien pudiera guiarme, estoy armando una aplicacion con vb.net 2005 y base en access. Quiero generar una actualizacion en la base de datos, tengo un Form donde coloque un listview que me muestra todos los socios, con un boton quiero aplicar una modificacion pero realmente llevo dias tratando y no me doy cuenta como hacer para seleccionar el item y poder modificar por ejemplo el domicilio pero en el listview, dejo el codigo para quien me pueda ayudar, desde ya muchisimas gracias!!


Private Sub BtModificar_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BtModificar.Click

con.Open()
Dim Modificar As New OleDbCommand
Modificar.Connection = con
Modificar.CommandType = CommandType.Text
Modificar.CommandText = "Update Socios set Apellido= " & TxtApellido.Text & ""

Modificar.ExecuteNonQuery()
con.Close()


End Sub

Private Sub LstConsultasocio_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles LstConsultasocio.SelectedIndexChanged
If LstConsultasocio.SelectedItems.Count > 0 Then TxtCodSocio.Text = LstConsultasocio.SelectedItems.Item(0).Text
End Sub