用VB写了一个小程序，想添加一个图标。

往哪儿添加图标，可以细说一下吗？我现给你编一下程序，不知对这位朋友是否有用。

首先在VB中添加一个新的窗体，具体步骤：工程——添加窗体——打开即可。

第二、再在该窗体上添加一个command按钮：命名为cmddj（cmd单击）、caption属性为“打开”.

第三、执行以下 *** 作：工程——部件——选中“microsoft common dialog control6.0”在前面打勾。现在在工具箱中就有了一个新的图标，把该图标画到新建的窗体中。名字不要改。注悉竖意该图标在运行时是不可见的，所以可以放到任意位置，该图标的大小好埋也不可改变。

第四、再在窗体上画一个Picture控件。大小适中name属性为Picture1。

然后为cmddj控件添加单击事件，代码如下

Private Sub Command1_Click()

Dim s As String

CommonDialog1.InitDir = "e:"友陆蚂

CommonDialog1.ShowOpen

s = CommonDialog1.FileName

Picture1.Picture = LoadPicture(s)

End Sub

在程序运行时单击“打开”按钮会出现一个对话框，然后找到你要的图标单击“打开”就可以打开了。

不知我说的这个是不是这位朋友想要的。如果不是我这还有一个方法。

如果你是要修改窗体的图标的话，那就修改主个窗体的icon属性即可。在这儿我推荐使用VB的图标库作为图标源。

先就到这儿了，如果不对，再联系。

1打开手机微信，在主界面伍旁档向下滑动会打开最近使用小程序列表。

2点击更多按钮可以查看所有的打开过的小程序。

3在列表中找到要添加到手机桌面的小程序并点击打开。

4打开小程序后，点击小程序画面右上角的更多按钮。

5这时点击添加到桌面。

6现在d出图标样式启哪，点腔乱击添加

7现在小程序就在手机桌面上，可以点击一下直接打开小程序。

---