vb中修更换用程序图标的代码？

答案:4 悬赏:20 手机版

解决时间 2021-03-29 05:05

提问者网友：ミ烙印ゝ
2021-03-28 05:17

vb中修更换用程序图标的代码？

最佳答案

五星知识达人网友：一叶十三刺
2021-03-28 05:30

Private Declare Sub InitCommonControls Lib "comctl32.dll" ()

Sub Main()

InitCommonControls

Load frmMain

End Sub

你首先要明确你是要修改的什么图标?
1 .如果你是要修改你编写的程序在生成的EXE的图标那么,你需要到工程属性下面去修改,VB 默认的生成后的EXE的图标为启动窗口的图标,而默认启动窗口为form1 .你可以修改FORM1的图标达到修改生成EXE后的图标. 也可以到 "工程"-"工程1(假定你现在的工程为它)属性" --"生成(选项卡)"--"应用程序下的图标中选择其它窗体的图标作为EXE的图标"
2. 你要修改的是窗体的图标那么,在窗体属性中(默认在工作平台的右边)找到"Icon" 当鼠标点到它的时候会出现"..."的按钮,选择你要作为图标的图标文件,就可以了.

全部回答

1楼网友：迟山
2021-03-28 06:09

Me.Icon = LoadPicture("路径")

2楼网友：不想翻身的咸鱼
2021-03-28 05:59

Me.Icon = LoadPicture("c:\a.ico")

3楼网友：洒脱疯子
2021-03-28 05:47

'在窗体中有一个命令按钮Command1
'在①处填入一个图标（*.ico)文件的路径，指定要更换成什么图标
'点击命令按钮即可更换成指定图标！！
Private Sub Command1_Click()
Me.Icon = LoadPicture("①") '文件名是字符串型
End Sub
'如果无法加载图标文件需要检查图标文件格式和文件路径！

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息