VB问题(shell函数与inputbox函数)?
使用shell函数的时候,由于目标文件位置不固定,所以我用一个字符串全局变量ae来表示目标文件路径。ae的值通过inputbox函数给定。如下:PublicaeAsStr...
使用shell函数的时候,由于目标文件位置不固定,所以我用一个字符串全局变量ae来表示目标文件路径。ae的值通过inputbox函数给定。如下:
Public ae As String
Private Sub Command3_Click()
Dim message, title, defaultValue As String
message = "Enter a path "
title = "InputBox Demo"
defaultValue = "C:\softbuild\a.exe"
ae = InputBox(message, title, defaultValue, 100, 100)
End Sub
Private Sub Command4_Click()
Shell (ae)
End Sub
运行后提示:文件未找到。
不知道问题出在什么地方,各位大哥指教。 展开
Public ae As String
Private Sub Command3_Click()
Dim message, title, defaultValue As String
message = "Enter a path "
title = "InputBox Demo"
defaultValue = "C:\softbuild\a.exe"
ae = InputBox(message, title, defaultValue, 100, 100)
End Sub
Private Sub Command4_Click()
Shell (ae)
End Sub
运行后提示:文件未找到。
不知道问题出在什么地方,各位大哥指教。 展开
展开全部
去空格?
ae = 去空格函数(InputBox(message, title, defaultValue, 100, 100) )
////好像是TRIM()?
///
Private Sub Command4_Click()
if dir(ae)<>"" then
Shell ae ,1
else
msg("文件找不到。请确认输入“)
end if
End Sub
ae = 去空格函数(InputBox(message, title, defaultValue, 100, 100) )
////好像是TRIM()?
///
Private Sub Command4_Click()
if dir(ae)<>"" then
Shell ae ,1
else
msg("文件找不到。请确认输入“)
end if
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
shell 要返回一个东东.
随便在它前面加个什么都可以.
比如.
idd=shell()
这样就可以了。
随便在它前面加个什么都可以.
比如.
idd=shell()
这样就可以了。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
加一行判断吧:
Private Sub Command4_Click()
if dir(ae)<>"" then
Shell ae ,1
end if
End Sub
Private Sub Command4_Click()
if dir(ae)<>"" then
Shell ae ,1
end if
End Sub
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询