GetFirst gets the first value in a list separated by commas.
Public Function GetFirst(src As Variant, delim As String) As String
' Get first string from "src" delimited by "delim".
' Ex: src="1234,5544" delim=",", this returns "1234"
' LOG
' 12-27-10 If src is empty, just return src.
Dim s As...