'NOTICE: This code is provided "AS-IS" with no warranties, and confers no rights.

'Required assembly references:
'System.Core, Version=3.5.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089


public function JoinDistinctSorted(a as Array, optional delim as string = ", ") as string

	Array.Sort(a)

	dim e  as System.Collections.Generic.IEnumerable(Of String)
	e = System.Linq.Enumerable.OfType(Of string)(a) 'remove nulls
	e = System.Linq.Enumerable.Distinct(Of string)(e)

	JoinDistinctSorted = string.Join(delim, System.Linq.Enumerable.ToArray(Of string)(e))

end function

public function JoinSorted(a as Array, optional delim as string = ", ") as string

	Array.Sort(a)

	dim e  as System.Collections.Generic.IEnumerable(Of String)
	e = System.Linq.Enumerable.OfType(Of string)(a) 'remove nulls

	JoinSorted = string.Join(delim, System.Linq.Enumerable.ToArray(Of string)(e))

end function