Puede utilizar muchas expresiones en el diálogo de expresión de la etiqueta.
Puedes intentar usar regex para llegar a algunos de los problemas difíciles de alcanzar.
Aquí está una de mis antiguas preguntas que puede mostrar cómo se puede utilizar.
Si sólo se trata de ceros finales o iniciales, puede utilizar...
Derecho ([micolumna],4)
que dejará todo en el frente dejando sólo 4 caracteres del lado derecho.
Function FindLabel( [NAME] )
Dim fldValue, aWords, i, word, aNewWords, NewWord, numElements, k
fldValue = [NAME]
'k = 0 'One word first line and two words all other lines
k = 1 'Two words first line and all other lines
if not IsNull(fldValue) then
aWords = split(fldValue, " ")
numElements = UBound(aWords)
'Create new array to store new field value and redimmension to store
' the correct number of elements to match original number of elements
aNewWords = Array()
Redim aNewWords(numElements)
for i = LBound(aWords) to UBound(aWords)
if i Mod 2 = k then
word = aWords(i) & vbCr
else
word = aWords(i)
end if
aNewWords(i) = word
next
NewWord = Join(aNewWords, " ")
else
NewWord = fldValue
end if
FindLabel = NewWord
End Function
Este es un ejemplo de una expresión de etiqueta de streetmap.