Comment valider un XML via un XSD en VB avec MSXML et sans .Net sous Windows ?

L'aide en ligne accompagnant XML Parser SDK donne des exemples dans plusieurs langages, ci-dessous un squelette en VBScript.
Remplacer les expressions entre accolades par les valeurs réelles ou des paramètres (ex.: {namespace}) :