如何将form的图标换成自己的icon图标。

Question

1、设计时：设置Form的Icon属性。
2、运行时：Form1.Icon=LoadPicture("自己Icon图标文件的路径及文件名(包含扩展名.Ico)")

Answer 1

很简单，设置一下form的icon属性即可，如果你想将exe的图表也换了，点工程-->属性，点生成选项，将图标换成你想要的图标

Answer 2

我的程序是，但通不过；
Dim sIcoPathName As String
sIcoPathName = App.Path & "\friend.ico"
Form1.Icon = LoadPicture(sIcoPathName)

Answer 3

form1.icon=app.path & "\friend.ico" 就可以了

Answer 4

1、friend.ico文件有问题或可能是假Icon ，换一个试试。
2、
If Right(App.path, 1) <> "\" Then
sIcoPathName = App.Path & "\friend.ico"
Else
sIcoPathName = App.Path & "friend.ico"
End If

Answer 5

我换了一个Icon就可以了，但这个friend.ico可以设置到button的picture属性，请问为什么？