Come si fa per ocnvertire una stringa in numero?

Ho questo:
...
Giorno = Day(Data)
Mese = Month(Data)
Anno = Year(Data)
Ora = Hour(Data)
Minuti = Minute(Data)
Secondi = Second(Data)

Data = Giorno & Mese & Anno & Ora & Minuti & Secondi


ho provato a far così:
Data = cInt(Data("Date()"))


ma mi dice: Overflow: 'cInt'