VB如何更改文件夹的图标？

[baitohhy]

我用的思路是创建文件夹后复制图标文件icon.ico至该文件夹下，写入desktop.ini，然后用attrib加属性+s +h +r。但是最后发现这些都做到了并且没有出错，但是文件夹图标还是出不来我重启过explorer.exe，重建过图标缓存
我的ini是这样写的：
[.ShellClassInfo]
IconResource=icon.ico,0
IconFile=icon.ico
IconIndex=0
注：两种格式都写是为了保证图标在XP、win7及以上系统都能显示


请教一下，正确的做法应该是什么样的？谢了~
(抱歉，帖子类型点错了)

[samlord]

同求，改文件图标会，目录的话要动explorer的吧

[赵4老师]

搜“Shell Extension”？

[PuBuQingQuan]

[.ShellClassInfo] IconResource=G:\111\测地\221.ico,0 [ViewState] Mode= Vid= FolderType=Documents 要填绝对路径

[笨狗先飞]

需要给文件夹加个只读属性。

[笨狗先飞]

挖坟了。。。

[Salted_Fish215]

在主窗体（启动窗体）的属性ICON中选你选定的图标文件，确定即可加载于窗体左上角，编译后的EXE可执行文件其图标就是你想要的。