Checkbox på ListView Valgt Item (Access)

Her eksperter
Som skrevet i titlen arbejder jeg med et ListView i Access.

På en Accessform har jeg indsat mit listview ,og angivet at der skal vises checkboxe. Med nedenstående kode fylder jeg data i mit listview når formen åbnes, dette viker fint

Function LoadPersonListe()
Form_frm25!lstpersoner.ListItems.Clear
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim itmX As ListItem
Dim sSQL As String
Set rs = New ADODB.Recordset
sSQL = "Select * From fs25"
With rs
Set .ActiveConnection = CurrentProject.Connection
.Open sSQL, , , adLockOptimistic
Do Until .EOF
Set itmX = Form_frm25!lstpersoner.ListItems.Add(, , rs!Info)
itmX.SubItems(1) = rs!PersonID
.MoveNext
Loop
End With
rs.Close
End Function

Problem:
Når jeg hakker af ud for et item på listen ville jeg gerne have at den item på listviewet jeg har hakket af automatisk bliver markeret. Jeg havede forstillet mig at det skulle køre via klik på lisviewet, jeg har navngivet mit listview lstpersoner

Private Sub lstpersoner_Click()
'Her skulle koden så skrives'
End Sub

Jeg er helt nybegynder i VB, men kender til VBA. Jeg har valgt at oprette spørgmålet i denne kategori, da kontrollen dybest set er en VB kontrol, nogen der har et forslag