Displaying drives in a listview problem.

I agree with Acamar about the error message. I forgot to mention that i changed that line to

Dim Type As String = ""