http://www.vbp.it/tutorials/api/

cmq io vado a seconda del nome della dichiarezione
mi sembra ovvio che
Private Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
non serve a disegnare un'icona