(Visual Basic 6.0) Auto-Trim XML Content when Loading

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

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Dim xml As New ChilkatXml
Dim success As Long

' If autoTrim is 1, then the content inside an leaf element is trimmed.
' For example:
Dim autoTrim As Long
autoTrim = 1
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 0, then the content inside leaf elements are not trimmed.
autoTrim = 0
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 = 1
success = xml.LoadXml2("<abc><xyz>  123   </xyz></abc>",autoTrim)
xml.EmitCompact = 1
Debug.Print xml.GetXml()

' Output is:

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

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

' Output is:

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