我用VB创建了一个保存在如下目录（E:\临时桌面\实验备份\实验5）的工程，然后用VB编了一个小程序，程序代码如下：
Private Sub Command1_Click()
Shell "E:ABAQUS\111\1.bat", 1                 
End Sub
我就是想用这个程序运行一个如下路径（E:\ABAQUS\111\1.bat）的批处理文件1.bat，这个1.bat文件我用鼠标直接双击打开功能是正常的，它的功能就是调用和它在同一个文件夹下的输入文件1.inp。可是我运行我编写的VB程序时发现提示要定位输入文件1.inp，如图：

然后我就把这个批处理文件1.bat和输入文件1.inp剪切到工程文件夹下（E:\临时桌面\实验备份\实验5） ,再运行然后发现调用成功了,如图： 我总结了一下，是不是dos命令行它只能查找或者运行和它在相同启动目录下的的文件啊？我想实现即使1.bat和1.inp文件不在VB工程目录文件夹下也能实现调用1.inp文件的功能，希望有高手能指点一下小弟，不胜感激～～

Private Declare Function SetCurrentDirectory Lib "kernel32" Alias "SetCurrentDirectoryA" (ByVal lpPathName As String) As Long
Private Sub Command1_Click()
SetCurrentDirectory "E:\ABAQUS\111\"
Shell "E:ABAQUS\111\1.bat", 1
End Sub