フィルタリングされた行を取得した後、いくつかの操作を実行するためにデータビューにいくつかの行を保持しようとしていますが、問題は、コードが実行されるたびに、最後に適用されたフィルターにデータビューが更新されることです。これがコードスニペストです。
If dsEmp.Tables.Count > 0 Then
dvEmp = dsEmp.Tables(0).DefaultView
dvEmp.RowFilter = "IDENTIFICATION_CODE = '" & IDENTIFICATION_CODE & "' and EMPLOYEE_DESC = 'Employment1'"
Dim dv1 As DataView = dvEmp
dvEmp.RowFilter = ""
If dsEmp.Tables(0).Rows.Count > 1 Then
dvEmp2 = New DataView
dvEmp2 = dsEmp.Tables(0).DefaultView
dvEmp2.RowFilter = "IDENTIFICATION_CODE = '" & IDENTIFICATION_CODE & "' and EMPLOYEE_DESC = 'Employment2'"
Dim dv2 As DataView = dvEmp2
dvEmp2.RowFilter = ""
End If
If dsEmp.Tables(0).Rows.Count > 2 Then
dvEmpPrevious = New DataView
dvEmpPrevious = dsEmp.Tables(0).DefaultView
dvEmpPrevious.RowFilter = "IDENTIFICATION_CODE = '" & IDENTIFICATION_CODE & "' and EMPLOYEE_DESC = 'Employment3'"
Dim dv3 As DataView = dvEmpPrevious
dvEmpPrevious.RowFilter = ""
End If
End If
しかし、2 番目のフィルターの後で dv1 の値を確認すると、異なる値が含まれています。
誰でもいくつかの解決策を提供できますか。ありがとう