Question

vb 如何把压缩文件路径 替换成变量呢？ 由于路径有空格

Dim Path1
Text3.Text = "D:\Program Files (x86)\Microsoft Office\YsFile"
Path1 = Text3.Text '要压缩的文件，路径带空格的话字符串最外面要加两对双引号

Dim RarPath
RarPath = Text3.Text & "\" & name '生成的压缩文件，路径带空格的话字符串最外面要加两对双引号

MsgBox RarPath

Shell """C:\Program Files\WinRAR\Rar.exe"" a "" & RarPath & "" *.jpg "" & Path1 & """, vbHide

Answer 1

把文件名用双引号括起来即可，比如： Shell """C:\Program Files\WinRAR\Rar.exe"" x ""D:\My Documents\xx.rar"" *.* ""D:\My Documents\a""", vbHide 以上代码是把 "D:\My Documents\xx.rar" 这个压缩文件中的所有文件（含路径）全部解压缩到 "D:\My Documents\a" 这个文件夹中。注意，在字符串中要用两个双引号""代表一个双引号"