日期:2014-05-20 浏览次数:20947 次
Dim query = From b In (From a In (From t1 In MainJoin t2 In Sec On t1.MainNo1 = t2.secondNo1 Into lg1From t2 In lg1.DefaultIfEmpty()t1)Join td In Third On a.MainNo2 = td.thirdNo1 Into lg2From td In lg2.DefaultIfEmpty()a)Join f In Four On b.MainNo3 = f.fourNo1 Into lg3From f In lg3.DefaultIfEmpty()New With { _
b.Mainid, _
b.secnondNo2, _
b.thridNo2, _
Key .fourNo2 = If(f Is Nothing, 0, f.fourNo2) _
}