关于打包的问题

你不打包，新建一个文件夹，直接把 EXE 文件和那两个图片文件夹拷贝进去，看看可以运行不。如果这样都不可以运行，那就是程序有问题。

还有，因为浏览文件，会导致 App.Path 发生变化，因此，应该用全局变量存储程序运行的路径——
Option Explicit
Dim mPath$
Private Sub Form_Load()
'　获取程序所在的路径
mPath = App.Path
If Right(mPath, 1) <> "\" Then
mPath = mPath & "\"
End If
'　……
End Sub
以后图片文件的描述是：mPath & "图片文件夹\图片文件名"
而不是：App.Path & "图片文件夹\图片文件名"

怎么打包成安装文件，安装后运行 我感觉只是把我的工程换了一个地方运行？因为安装目录里面全是我的文件，什么窗体代码都在里面。没有办法加密吗