代码: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
VB提示路径/文件访问错误,无法运行,但是之前都可以运行,请教下什么问题?
答案:2 悬赏:40 手机版
解决时间 2021-02-03 02:38
- 提问者网友:遮云壑
- 2021-02-02 04:10
最佳答案
- 五星知识达人网友:白昼之月
- 2021-02-02 05:33
路径/文件访问错误(错误 75):
在文件访问或磁盘访问操作期间,例如,open、mkdir、chdir 或
rmdir,操作系统不能连接路径和文件名连接。此错误有以下的原因和解决方法:
1)文件指定的格式不正确。
文件名可以包含完整限定的(绝对)或相对的路径。完整限定的路径以驱动器名称(如果路径在另一台驱动器上)为开始,并且列出从根目录到文件的路径。任何非完整限定的路径都是相对于当前驱动器和目录的。
2)试图保存到只读文件上。
修改目标文件的只读属性或以其他文件名保存。
3)在顺序 output 或 append 模式下试图打开只读文件。
以 input
方式打开文件,或是要修改文件的只读属性。
详细信息,可选取有问题的项目,并按下 f1 键。
在文件访问或磁盘访问操作期间,例如,open、mkdir、chdir 或
rmdir,操作系统不能连接路径和文件名连接。此错误有以下的原因和解决方法:
1)文件指定的格式不正确。
文件名可以包含完整限定的(绝对)或相对的路径。完整限定的路径以驱动器名称(如果路径在另一台驱动器上)为开始,并且列出从根目录到文件的路径。任何非完整限定的路径都是相对于当前驱动器和目录的。
2)试图保存到只读文件上。
修改目标文件的只读属性或以其他文件名保存。
3)在顺序 output 或 append 模式下试图打开只读文件。
以 input
方式打开文件,或是要修改文件的只读属性。
详细信息,可选取有问题的项目,并按下 f1 键。
全部回答
- 1楼网友:酒醒三更
- 2021-02-02 07:10
林肯郡在那里同天和水相接。
另一匹似乎在旁观──
我不停地注视着你,
我们穿上的衣服,
但半路上它刷着某人的脸,
夏一个的微风,哈哈
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯