VB怎么在设置关联图标后立即生效

VB如何在设置关联图标后立即生效
如题,我已经成功做了文件关联了,关联图标也没问题,就是图标需要注销后才能显示,我想知道有什么方法可以不用注销和关闭explorer.exe来刷新文件关联图标,如千千静听的文件关联,选择确定后关联图标自动刷新,系统桌面只是闪一下.

------解决方案--------------------
gpupdate /force
RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters

你执行上面2条命令即可
shell 调用下.
------解决方案--------------------
有必要用API吗?用的话比较麻烦点...
------解决方案--------------------
关注，帮顶
------解决方案--------------------
SendMessage(HWND_BROADCAST, WM_SETTINGCHANGE, 0, 0)
我不知道行不行，只能试试了
另外，你可以给出你的代码让我测试