Fra listview til type

Jeg bruger en listview til at vise nogle forskellige data.
Disse data hentes fra et defineret type "CD".
At hente data fra typen og vise i listview1, kan jeg godt, men tage data fra listview1, kan jeg desværre ikke finde ud af.
Håber at folk herinde kan.

(Nogle af variablerne bliver ikke brugt)

Public FilNavn As String
Public ValgtNavn As String
Public Postnr As Integer
Public Postlængde As Integer
Public SidstePost As Integer

Type CD
    Kunstner As String * 50
    Titel As String * 50
    Tid As String * 10
    Rating As Integer
    Kommentar As String * 200
    Id As Integer
End Type

Public Register As CD


Private Sub Form_Load()
    FilNavn = "users\" & ValgtNavn
    List
   
End Sub

Private Sub List()
   
    Postlængde = Len(Register)
    Open FilNavn For Random As #1 Len = Postlængde
    SidstePost = FileLen(FilNavn) \ Postlængde
   
    ListView1.ListItems.Clear
   
    For i = 1 To SidstePost
        Get #1, i, Register
        Set itm = ListView1.ListItems.Add(1, "Row" & i, RTrim(Register.Kunstner))
        itm.SubItems(1) = Register.Id
        itm.SubItems(2) = RTrim(Register.Titel)
        itm.SubItems(3) = RTrim(Register.Tid)
        itm.SubItems(4) = RTrim(Register.Rating)
        itm.SubItems(5) = RTrim(Register.Kommentar)
       
    Next i
   
    Close #1
End Sub