我的程式大約如此,後來我做了計數器去檢查
可是每次程式大約跑了兩千多個流程
就自動跳開,查不出原因. 請高手指點一下
Private Sub Command1_Click()
On Error GoTo HANDEL
'程式碼....
'statement
'程式碼....
Command1_Click
Exit Sub
HANDEL:
'錯誤重複執行
Command1_Click
Exit Sub
End Sub
可是每次程式大約跑了兩千多個流程
就自動跳開,查不出原因. 請高手指點一下
Private Sub Command1_Click()
On Error GoTo HANDEL
'程式碼....
'statement
'程式碼....
Command1_Click
Exit Sub
HANDEL:
'錯誤重複執行
Command1_Click
Exit Sub
End Sub
文章標籤
全站熱搜
暫時取消 On Error GoTo HANDEL,執行程式就知道錯誤在哪.
你的遞迴沒結束
我看了一下msdn的一個說明範例 Private Sub Command1_Click() Main End Sub Sub Main() Static intX As Integer intX = intX + 1 Main End Sub 像這樣的堆疊空間不足的問題又該如何解決 假使我需要算到的數值很多 或我的流程需要跑好幾千個迴圈