Question

请问能把VB代码在桌面上新建的图标更改一下吗！虽然能用VB新建快捷方式，但图标太丑！

Answer 1

当然是可以的，但是前提是你要有一个做为图标的ICO文件，例如你想在桌面上创建HAO123的快捷方式，那么你要有一个HAO123网站的图标，可以自己下载，一般网站的图标都在根目录下，如：http://www.hao123.com/favicon.ico，名字为FAVICON.ICO，先把它放在你程序的目录中，然后再指定个路径：
Set objShut = objWSH.CreateShortcut(strDesk & "\Hao123.lnk")
objShut.TargetPath = "http://www.hao123.com"
objShut.IconLocation=App.Path & "\favicon.ico"
objShut.Save

这里还有一个地方没太注意，如果要生成网页有快捷方式的话也可以让系统直接带上图标的，这样写就行：
Set objShut = objWSH.CreateShortcut(strDesk & "\Hao123.url")'这里直接换成网页快捷方式的扩展名
objShut.TargetPath = "http://www.hao123.com"
objShut.Save