Question

VB提示路径/文件访问错误,无法运行，但是之前都可以运行,请教下什么问题？

代码：Private Sub aerialdistance_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 33327
End Sub

Private Sub drag_Click()

Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 1022

End Sub

Private Sub fileexit_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 57602
End Sub

Private Sub fileopen_Click()

Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 57601

End Sub

Private Sub filesave_Click()

Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 57603

End Sub

Private Sub filesaveas_Click()

Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 57604

End Sub

Private Sub horizontaldistance_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 33326
End Sub

Private Sub measurearea_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 33350
End Sub

Private Sub north_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 7008
End Sub

Private Sub rotate_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 34026
End Sub

Private Sub slide_Click()

Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 1021

End Sub

Private Sub snapshot_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 32783
End Sub

Private Sub snapshotas_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 32781
End Sub

Private Sub snapshotsize_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 32785
End Sub

Private Sub turnandtilt_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 2023
End Sub

Private Sub verticaldistance_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 33330
End Sub

Private Sub zoom_Click()
Dim IMenu1 As IMenu
Set IMenu1 = New TerraExplorer
IMenu1.Invoke 32771
End Sub

Answer 1

林肯郡在那里同天和水相接。
另一匹似乎在旁观──
我不停地注视着你，
我们穿上的衣服,
但半路上它刷着某人的脸，
夏一个的微风，哈哈

Answer 2

按F8逐条执行一下，看看哪行代码出现问题了

追问

额，一运行就出现问题！

追答

那就是开始的地方的路径设置有问题，看看连接的地方（比如库）

追问

问下你QQ

追答

95177057
你以前是在哪个盘符哪个路径下运行的，应该有改变了吧