Dim List = (From AAA In aaa Join BBB In bbb On AAA.コード Equals AAA.コード And BBB.コード Equals AAA.ID Order By BBB.ID) _ .Select(Function(AAABBB) New With{Key .部署コード =AAABBB.AAA.コード, Key .個人ID = hoktok.AAA.ID, Key .担当者名 = AAABBB.BBB.名前}).ToArray DefaultIfEmptyを使用すれば、LeftJo…