If e.DataCol.Name = "折扣"
Dim Filter As String = "[当前等级] = '" & e.DataRow("等级") & "'"
Dim drs As List(Of DataRow) = DataTables("会员表").Select(Filter)
For Each dr As DataRow In drs
dr("折扣") = e.DataRow("折扣")
Next
End If
求解释这句话的每一段代码。自己弄好久都不明白。
特别是for each这一段。
[此贴子已经被作者于2013-3-5 19:17:37编辑过]