如何用vb實現以下邏輯?
出錯的時候去執行一段代碼之後,再回到出錯的地方接著往下執行
如何用vb來實現?
Sub FFFFFFF()
AAAA:
On Error goto BBBB
....
....
On Error goto 0
Exit Sub
BBBB:
.....
.....
Resume Next
End Sub
感觉楼主的想法不太合理，不过还是可以实现的
比如：
VB code:
Private Sub Command1_Click()
Dim I As Integer
Dim J As Integer
Dim M As Integer
On Error GoTo errSub
I = 10
J = 0
LabX:
M = I \ J
Debug.Print M
Exit Sub
errSub:
J = 1
GoTo LabX
End Sub
VB code:
'在出错语句前加上
On Error Resume Next
...
'之后加上
'On Error GoTo 0
一樓的朋友的解決方法正是我想要的!謝謝
雖然這樣的邏輯很奇怪.我在用word寫一個自動排版照片的功能,問題是我在用word的VBA的時候,轉換圖片的時候報錯具有不確定性,我循環轉換所有未轉換的圖片,有時候出現轉換失敗報錯,點擊繼續$
相关问答：
请教一下：我用vb写了一个调用Illustrator的测试程序，代码很简单：Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
vb写的程序编译后,运行若出错,如何知道到在哪一行?
按Ctrl+F5预编译，出错时会跳转到错误行
不是那样的了,我是要求编译成EXE后运行,提示出错能否提示错在哪一行.
我编译后在我的电脑上运行没问题,但� ......
Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 3 ’刪除
Dim YesNo As String
&nbs ......
昨天谢谢 chenhui530 帮我解决了窗口和类名的动态随机生成。
但现在有一个疑问，就是所有窗口和控件改成的随机类名后，是否在程序关闭时自动销毁了呢？
如果卸载窗体时加上END，会自动进行清理。
最好养成 Re ......
请教一个有关Commondialog控件的问题（使showfont方法）
第一个问题：
Commondialog这个控件的Flags属性是不是只能在代码中设置
为何我在属性框里的Flags一栏中输入cdlCFScreenFonts（屏幕字体 ......
