Question

vb怎么压缩解压文件？

vb怎么压缩解压文件？帮助一下，谢谢

Answer 1

安装 WinRAR

Private Sub Command1_Click()
'压缩文件c:\01.txt
Shell "C:\Program Files\WinRAR\WinRAR.exe a c:\02.rar c:\01.txt"
End Sub

Private Sub Command2_Click()
'解压文件到d：\
Shell "C:\Program Files\WinRAR\WinRAR.exe e c:\02.rar d:\"
End Sub

Answer 2

推荐采用免费的DOS版RAR程序，然后用SHELL "命令行" 的方式压缩解压文件，我就这么干的，做起来方便很多。