(Excel) Auto-Trim XML Content when Loading

This example explains the "autoTrim" argument that is passed to a method such as LoadXml2.

Download Excel Class Modules Chilkat Excel Class Modules

Dim xml As Chilkat.Xml
Set xml = Chilkat.NewXml

' If autoTrim is True, then the content inside an leaf element is trimmed.
' For example:

autoTrim = True
Dim success As Boolean
success = xml.LoadXml2("<abc><xyz>  123   </xyz></abc>",autoTrim)
Debug.Print xml.GetXml()

' Output is:
' (notice the SPACE chars before and after "xyz" are trimmed)

' <?xml version="1.0" encoding="utf-8" ?>
' <abc>
'     <xyz>123</xyz>
' </abc>

' If autoTrim is False, then the content inside leaf elements are not trimmed.
autoTrim = False
success = xml.LoadXml2("<abc><xyz>  123   </xyz></abc>",autoTrim)
Debug.Print xml.GetXml()

' Output is:

' <?xml version="1.0" encoding="utf-8" ?>
' <abc>
'     <xyz>  123   </xyz>
' </abc>

' --------------------------------------------------------------------
' The EmitCompact property controls whether XML is emitted indented (pretty-printed)
' or compact.  For example:

' Auto-trim + emit compact:
autoTrim = True
success = xml.LoadXml2("<abc><xyz>  123   </xyz></abc>",autoTrim)
xml.EmitCompact = True
Debug.Print xml.GetXml()

' Output is:

' <?xml version="1.0" encoding="utf-8" ?>
' <abc><xyz>123</xyz></abc>

' No Auto-trim + emit compact:
autoTrim = False
success = xml.LoadXml2("<abc><xyz>  123   </xyz></abc>",autoTrim)
xml.EmitCompact = True
Debug.Print xml.GetXml()

' Output is:

' <?xml version="1.0" encoding="utf-8" ?>
' <abc><xyz>  123   </xyz></abc>