We can group the data and count the group members
Assign Acitvity
dictStatistic | Dictionary(Of String, int32) =
YourDataTableVar.AsEnumerable.GroupBy(Function (x) x("Employe Name (No)").toString.Trim.ToDictionary(Function (g) g.Key, Function (g) g.Count
OR
Build DataTable - 2 cols: Key, Count - dtStatistic
Assign Activity:
(From d in YourDataTableVar.AsEnumerable
Group d by k=d("Employe Name (No)").toString.Trim into grp=Group
Let ra = new Object(){k, grp.Count}
Select r = dtStatistic.Rows.Add(ra)).CopyToDataTable