(From t1 In dtTable1.AsEnumerable()
Group Join t2 In dtTable2.AsEnumerable()
On t1("Name") Equals t2("Name") Into Group
Let Country = If(Group.Any(), Group.First()("Country").ToString(), "")
Let Duplicate = If(dtTable1.AsEnumerable().Count(Function(x) x("Name").ToString() = t1("Name").ToString()) > 1, "Duplicate", "")
Let ID = t1("ID").ToString()
Let Name = t1("Name").ToString()
Select dtTable3.Rows.Add({ID, Name, Country, Duplicate})).
DistinctBy(Function(row) row("Name").ToString()).
CopyToDataTable()