Win XP: VB 2005

Hallo,
hab mal wieder n Frage zu VB 2005.
Und zwar hab ich des so...
Ich hab in meiner Form eine Checklistbox.
Bei Formload habe ich den Code:

Dim directory As New System.IO.DirectoryInfo("D:\")

        For Each file1 As System.IO.FileInfo In directory.GetFiles

            If file1.Extension = ".mpg" Or file1.Extension = ".mpg" Then
            End If
            CheckedListBox1.Items.Add(file1.Name)

Funktioniert auch soweit, er läd die Dateien mit der endung *.mpg in die checklistbox.
Jetzt kommt die Frage und zwar brauch ich ein Code, der wenn ich in der checklistbox bei einem Item ein Hacken setze, das er den Pfad der Datei in eine Textbox einträgt.Geht das?

Noch n Frage.
was muss ich einstellen damit ich in der checklistbox nur ein hacken setzen kann?