CodeItBetter Programming Another VB Programming Blog

'String Manipulation - How to trim characters from the Beginning of a string
Option Explicit
 
Public Function LTrimChar(ByVal Expression As String, Optional ByVal sTrimChar As String = " ") _
    As String
    Dim iLength As Integer
    iLength = Len(sTrimChar)
    Do While (Left$(Expression, iLength) = sTrimChar)
        Expression = Mid$(Expression, iLength + 1)
    Loop
    LTrimChar = Expression
End Function