條件在for循環逍遙子

Question

我的代碼如下：

sub main() 

'''some more code''' 

For j = InStr(1, stext, " ") To Len(stext) 
     If IsNumeric(Mid(stext, j, 1)) Or IsAlpha(Mid(stext, j, 1)) Then 
      letter1 = Mid(stext, j, Len(stext)) 
      Exit For 
     End If 
    Next j 

'''some more code''' 

end sub 

當我通過宏行走，當它到達這條線：

If IsNumeric(Mid(stext, j, 1)) Or IsAlpha(Mid(stext, j, 1)) Then 

逃離了整個子！

我在做什麼錯，我該如何解決？

Answer 1

我認爲這可能有幫助。

ISALPHA, ISNUMERIC? - Microsoft Access/VBA Answers

Answer 2

這通常發生在出現錯誤時。在這種情況下，它可能是一個超出界限的錯誤。您可能在stext的末尾留出空間，這會導致此問題。