Ayuda con Listview

[SoloVisual]

Buenas tardes
Estoy creando un base de datos en Visual Basic 6 (utilizo referencia DAO 2,5/3.51) y no encuentro código para guardar la información contenida en un listview con 2 columnas que se llaman "Patologia" y "Observación" y la tabla se llama tPacientes
la rutina para guardar comienza asi:

Private Sub cmGuardar_Click()
tPacientes.Index = ("índice")
tPacientes.Seek "=", Label1
If Not tPacientes.NoMatch Then
MsgBox "Ya existe una Historia con este registro", vbInformation, "Guardar"
Exit Sub

Else

tPacientes.AddNew
tPacientes("Registro") = Label1
tPacientes("Fecha") = Date

'Aqui debo escribir código para guardar el contenido del Listview que previamente se ha llenado con un Combobox

tPacientes.Update
End sub


Gracias de antemano