【发布时间】:2013-08-18 17:00:16
【问题描述】:
所以我试图让这个程序打开一个用户选择的文件,所以我首先拥有它们 输入他们已经在桌面上的文件并将 .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
【问题讨论】:
-
伟大的变量命名,顺便说一句。
标签: vbscript