此函数从字符串中删除所有前导空格(空格、制表符等):

This function removes all leading whitespace (spaces, tabs etc) from a string:

Function LTrimEx(str)
  Dim re
  Set re = New RegExp
  re.Pattern = "^\s*"
  re.Multiline = False
  LTrimEx = re.Replace(str, "")
End Function