Extracting the icons associate with the files and displaying in a ListView

Question

I have a code issue in vb.NET that I have not been able to resolve for several days. Please be indulgent, I am not fluent in English, I am French! So my first piece of code fill