Bonsoir,
En faisant simple avec la librairie vb6i :
ch="00000000000001FF00000005FFFFFFFF": ret= ConvertBaseZ(ch,16,2)

Cela fonctionne aussi avec des valeurs beaucoup plus grandes que 1021 ...