Dichiaro il tipo:

Public Type stato
Dim nome As string
dim valore as long
End Type

e quando compilo mi dice che dim non è valida all'interno del blocco type???