Di quale linguaggio stiamo parlando ? (VBA, VB6 ... dovresti indicarlo nel titolo).

A parte questo, l'uso della funzione Len non ha molto senso per il tuo problema.

Non ho ben capito da cosa parti e dove vuoi arrivare ma devi considerare di usare i formati e le funzioni intrinseche di gestione del tempo oppure semplici funzioni di conversione da stringa a valore numerico, in modo da risolvere con una riga il problema.