むむ?
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
ループ回しながら・・・。ループ完了してないのにデータがないとかわからないんじゃ?