VB6.0 如何跳过 实时错误1004
答案:1 悬赏:70 手机版
解决时间 2021-11-27 01:23
- 提问者网友：孤凫
- 2021-11-26 17:30
VB6.0 如何跳过 实时错误1004
最佳答案
- 五星知识达人网友：风格不统一
- 2021-11-26 18:15
哪一行报的错误，应该是第一行吧，那你得把OnError Resume Next放到第一行
On Error Resume Next
Set xlbook = xlApp.Workbooks.Open(MSFlexGrid1.TextMatrix(i, 1), , ReadOnly, , "")
If Err.Number = 1004 Then
MsgBox "有密码"
End If
On Error Resume Next
Set xlbook = xlApp.Workbooks.Open(MSFlexGrid1.TextMatrix(i, 1), , ReadOnly, , "")
If Err.Number = 1004 Then
MsgBox "有密码"
End If
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯