7,788
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
zxp319 2003-05-17
- 打赏
- 举报
me.icon=loadrespicture(100, vbResIcon)
bluelang 2003-05-17
- 打赏
- 举报
Private Sub Form_active()
Me.Icon = LoadPicture(App.Path & "\image\1.ico")
End Sub
Me.Icon = LoadPicture(App.Path & "\image\1.ico")
End Sub
huangjianyou 2003-05-17
- 打赏
- 举报
Private Sub Form_Load()
Me.Icon = LoadPicture(App.Path & "\AA.ico")
End Sub
Me.Icon = LoadPicture(App.Path & "\AA.ico")
End Sub
xumiao001982 2003-05-17
- 打赏
- 举报
用语句如何实现呢
czjw 2003-05-17
- 打赏
- 举报
先找一个图标，然后打开form属性的icon的‘…’选中你的图标文件。OK！
xumiao001982 2003-05-17
- 打赏
- 举报
可是icon的值是什么啊
tshow 2003-05-17
- 打赏
- 举报
up！
zsgzsgzsg 2003-05-17
- 打赏
- 举报
修改form得icon属性
