Potreste darmi inoltre un esempio d'uso con TransferText tramite VB?