這是我想要做的：
將 compareList 的每一行與 refList 的每一行進行比較
----- Do you find 'Leistungscode' of compareList in refList?
----- Yes--> Ignore
----- No--> New Entry, add to resutList
我的問題是，對于我的 for each 回圈，每次Leistungscode不匹配時它都會創建一個新條目，但是我需要先查看整個內容refList，然后將其添加到串列中，如果我還沒有找到它。你知道怎么做嗎？
這是我嘗試過的：
For Each rowCompare In compareList
For Each rowRef In refList
If rowCompare.Leistungscode.CompareTo(rowRef.Leistungscode) = 0 Then
Else
resultList.Add(New ISAACService(rowCompare.Leistungscode, rowCompare.K_Art, rowCompare.UANR, rowCompare.Ueberbegriff, rowCompare.Benennung, rowCompare.Anzahl, rowCompare.Einheit, rowCompare.Einzelkosten, rowCompare.Summencode))
End If
Next
Next
uj5u.com熱心網友回復：
首先我認為你不應該使用CompareTo. CompareTo做額外的作業來確定位置。你只需要一個等號。
空的If，只有在 else 中的代碼，可以通過添加Not到 if來糾正。
這里真正的關鍵是Exit For. 一旦找到不匹配的實體，該實體就會添加到 中，resultList因此我們希望在此時停止搜索以避免resultList. Exit For只退出內For回圈。外回圈將繼續處理 的下一個元素commpareList。
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
For Each rowCompare In compareList
For Each rowRef In refList
If Not rowCompare.Leistungscode = rowRef.Leistungscode Then
resultList.Add(New ISAACService(rowCompare.Leistungscode, rowCompare.K_Art, rowCompare.UANR, rowCompare.Ueberbegriff, rowCompare.Benennung, rowCompare.Anzahl, rowCompare.Einheit, rowCompare.Einzelkosten, rowCompare.Summencode))
Exit For
End If
Next
Next
MessageBox.Show(resultList.Count.ToString)
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/yidong/320897.html
標籤：网络
上一篇：“呼叫堆疊只包含外部代碼”錯誤