Thanks Joachim - I haven't tried using lambda functions till now and they are helpful!
This is what I finally did that does work:
'-- Get Distinct ManagerID
Dim LQManagerOriginalA = (From a In DCAppMain.tblPeopleMain
Where a.ManagerID IsNot Nothing And a.CurrentEmployee = True And a.UserType = "Full"
Group By a.ManagerID Into g = Group
Order By ManagerID
Select New With {.ManagerID = ManagerID})
'-- Get Ordered List of FullNames and PeopleIDs
Dim LQManagerOriginalB = LQManagerOriginalA.[Select](Function(a) a.ManagerID).AsEnumerable().[Select](Function(a) New With {Key .Person = PP.GetFullName(a), Key .PeopleID = a}).OrderBy(Function(x) x.Person).ToList()
'-- Apply datasource to combobox
RemoveHandler cboManagerOriginal.SelectedIndexChanged, AddressOf cboManagerOriginal_SelectedIndexChanged
cboManagerOriginal.DataSource = LQManagerOriginalB
AddHandler cboManagerOriginal.SelectedIndexChanged, AddressOf cboManagerOriginal_SelectedIndexChanged
cboManagerOriginal.DisplayMember = "Person"
cboManagerOriginal.ValueMember = "PeopleID"