むむ?

MSDN Visual Basic フォーラム:コレクションが修正されました。列挙操作が実行されない可能性があります。というエラーについて
本題からずれますけど。


For Each dr In ds.Tables("aaaa").Rows
If finddr Is Nothing Then              ←新規追加(入力したデータを元に検索をして、データがなければ)

newdr = ds.Tables("aaaa").NewRow()
newdr("code") = "123"

newdr("hinmei") = "カレー"

ds.Tables("aaaa").Rows.Add(newdr)
Else ←データの変更(入力したデータを元に検索をして、データがあれば)

finddr(0) = "456"

End If
Next

これでどうやって「入力したデータを元に検索をして、データがなければ」を判断してるんだろう・・・?
ループ回しながら・・・。ループ完了してないのにデータがないとかわからないんじゃ?