GoTo文以外のジャンプ命令のようなものについて

---

ex01:
   Do Until i >= Len(Add) + 1
        ・
      GoTo  ex01
        ・
        ・
   loop
のように、GoTo文を使ってループのところまで戻りたいのですが、GoTo文以外で戻る方法はありますか？？Exitの逆(？)みたいなかんじで。。お願いします。

編集 削除

---

ループ中からGotoでループ外のところに処理を移すのは良くないです。

もう１つうえにDo〜Loopブロックを作ればいいんじゃないですか？
下記例ではラベルを書いてますが戻ってくる位置を示しているだけで使いません。

Dim blnContinue As Boolean

blnContinue=True

Do While blnContinue
ex01:
  Do While Until i >= Len(Add) + 1
    If 〜 Then
      Exit Do
    End If
    
    〜  処理  〜
    blnContinue=False
  Loop
Loop

その他の手段でも目的の事は達成できそうなので考えてみてください。

編集 削除

---

はい、ありがとうございます。早速やってみたのですが、処理の内容のほうが記述を間違っていたみたいなので、うまくいきませんでした。もう一度最初から処理を見直して、０１２３さんに教えていただいた方法でやってみます。今度はできそうです。本当にありがとうございました。

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。