Function FindLabel([Name]) var = [Name] splitStr = Split(var, chr(32)) for i = 0 to UBound(splitStr) tmpStr = Trim(splitStr(i)) if len(tmpStr) > 0 then tmpStr = UCase(Left(tmpStr,1)) & LCase(Right(tmpStr, Len(tmpStr) -1)) splitStr(i) = tmpStr next ProperCase = join(splitStr, " ") FindLabel = ProperCase End Function
Membros conectados podem postar, seguir atualizações e mais. Novo aqui? Registre uma conta gratuita.
Find useful guides, FAQs, and documents to help you navigate and make the most of Esri Community.