0

所以我试图让这个程序打开一个用户选择的文件,所以我让他们首先输入他们已经在桌面上的文件并将 .txt 扩展名放在名称后面,然后我尝试在末尾添加名称该目录并在线显示:10 列:1 类型不匹配任何帮助将不胜感激,谢谢。我是新来的 :)

Option Explicit
Dim a, b, c, d, e

Set a = createobject("wscript.shell")

c = msgbox("Welcome to my word finding program!", vbInformation+vbOkCancel+vbDefaultButton1+vbSystemModal, "Information: ")

b = inputbox("MAKE SURE THAT YOUR FILE IS ON YOUR DESKTOP!" &vbLf& "Please enter the name of your .txt file" &vbLf& "Rembmer to add .txt after it" &vbLf& "EX: Name.txt")


a.run"C:\Users\%username%\Desktop\", b
4

1 回答 1

2
  1. 之后空间不见了a.run
  2. http://msdn.microsoft.com/en-us/library/d5fk67ky%28v=vs.84%29.aspx
    文件夹和文件名不是两个单独的参数。
    a.run "C:\Users\%username%\Desktop\" & b
  3. 但是,路径和文件名可能包含空格,因此您应该始终引用它们(字符串中的引号写成两个引号)

    a.run """C:\Users\%username%\Desktop\" & b & """"

于 2013-08-18T09:00:16.623 回答