我弄了一个按钮,并插入了图片笑脸图!
写好代码设置点击后加载另一张怒脸图!
代码中写好了图片路径!
生成.EXE 文件
如果,图片不在路径上,或给别的机子试用为什么找不到图片!
图片不是加载到EXE文件里.. 加载到EXE文件里的只有原来在属性栏上设置的Picture值!
有没有什么方法,可以让所以图片都加载到EXE文件上.可以让EXE独立使用!
Private Sub Command1_Click()
If Command1.Caption = "笑" Then
Command1.Picture = LoadPicture("h:\T_T.gif")
Command1.Caption = "怒"
Else
Command1.Caption = "笑"
Command1.Picture = LoadPicture("h:\^^.gif")
End If
End Sub