Complimenti!

Se avevi problemi con Left() bastava chiedere.
Personalmente ho abbandonato VB6 per passare a VB.Net, ma nel tuo codice ho mantenuto le istruzioni che avevi usato tu...