再帰処理を途中で抜けるには

OS:XP
VB6.0

はじまして。
現在、ツリー構造のオブジェクトを検索し
ある名前（文字列）が着たら再帰処理を抜けて
オブジェクトを取得したいです。
しかし、処理が最後まで行ってしまい
オブジェクトを取得する事ができません。

ご存知の方宜しくお願いします。

No.1 ベストアンサー 回答者： redfox63 回答日時： 2008/11/02 13:48

現在のソースを支障の無い範囲で公開してみましょう

どのような操作を行って どのような結果がお望みなのでしょう
実際にそのコードで実行した場合の結果とどこが食い違ってしまうのかを具体的に記述しましょう

一般的には再帰処理なら
1) 再帰の終了条件のチェック
　　条件成立なら Exit Subまたは Exit Function
2) 特定の条件成立のチェック
　　条件成立なら Exit Subまたは Exit Function
3) 再帰条件のチェック
　　再帰呼び出しの実行
4) 最終処理
手順でしょう

public function getList( myClass as Class1) as Class1
　　' 再帰の終了条件のチェック
　　if myClass Is Nothing then
　　　　set getList = Nothing
　　　　exit Function
　　end if
　　' 特定の条件のチェック
　　if myClass.Text = "foo" then
　　　　set getList = myClass
　　　　exit function
　　end if
　　' 再帰呼び出し
　　set getList = getList( myClass.pNext )
end function
といった具合かと ・・・

この回答へのお礼

ご回答ありがとうございました。
お蔭様で解決にたどり着く事ができました。

お礼日時：2008/11/17 09:27