VB6.0如何给编写好的软件打包？

VB6.0给编写好的软件打包的方法：

1、打开VB6.0IDE，加载你的工程，单击“外接程序”菜单下的“外接程序管理器”。

2、在d出的窗体中选择“打包和展开向导”(最后一项),在加载行为中选择“加载/卸载”，确定。

3、再次单击“外接程序”菜单项，单击“打包和展开向导”。

4、单击“打包”，选择“标准安装包”，一直单击下一步，最后点“完成”，点“关闭”。

5、此时你的工程文件夹下会有一个名为“包”的文件夹。

6、单击“展开”，单击下一步(2个)，此时询问“您希望在哪里展开这个包?”，单击“新建文件夹”

在电脑中其他位置新建一个文件夹，单击下一步，点“完成”，点“关闭”。

7、关闭“打包和展开向导”。

8、在刚才建立的文件夹下就是安装程序了！（三个文件:工程名.cabsetup.exesetup.lst）

注意：如果在其他机器上安装时提示“需要重新启动”，通常是你的程序中引用的资源路径不正确，请用App.path等绝对路径，如还不行，可能是一些.dll文件版本不兼容或不存在等其它原因，请在打包时加载你用到的所有的库

1)在菜单"外接程序"下选"外接程序管理器",在'外接程序管理器'窗口选中

"VB 6 API VIEWER".

对加载行为项选 加载/卸载

然后确定,再在在菜单"外接程序"下选"API 浏览器",出现"API 浏览器"窗口,打开文件菜单选加载文本文件,选WIN32API.TXT.

以下就是由"API 浏览器"中对ShellExecute函数声明复制的代码:

Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

2)自动链接到IE 浏览器

Private Sub Command1_Click()

Dim open_iE

open_iE = Shell("C:\Program Files\Internet Explorer\IEXPLORE.EXE", 1)

End Sub

四种方法：注意环境变量的使用，以及shell的第2个参数

Private Sub Command1_Click()

Shell Environ("SystemRoot") &"\notepad.exe", vbMinimizedNoFocus '相对路径，启动记事本并最小化

Shell "c:\windows\system32\winmine.exe", vbNormalFocus '绝对路径，启动扫雷游戏，并设置焦点

Shell Environ("ComSpec") &" /c start freecell.exe", vbNormalNoFocus '调用CMD，启动空当接龙，并不设焦点

Shell Environ("ComSpec") &" /k dir", vbMaximizedFocus '调用CMD，执行DOS命令列出文件列表，执行完成后不退出CMD，并最大化

End Sub

---