Public Sub LoadFromXML( _
   ByVal xml As String _
)