Sei sicuro di aver scritto il codice correttamente? A me funziona benissimo in VB6.