Lavoro con Stringhe

[Mabi]

E' vero, altrimenti continua a lavorare con le stringhe usando una funzione che sarebbe una specie di LTrim ma per gli zeri.

Function LTrim_0(ByVal Str1 As String) As String
Dim Cont As Integer

LTrim_0 = Str1
For Cont = 1 To Len(Str1)
  If Mid(Str1, Cont, 1) = "0" Then
    LTrim_0 = Mid(Str1, Cont + 1, Len(Str1) - Cont + 1)
  Else
    Exit For
  End If
Next Cont
End Function