la funzione LEN da strani risultati per i valori non stringa... forse fa anche da "sizeof"
codice:Private Sub Form_Load() Dim a As Integer Dim b As Double Dim c As String MsgBox "sizeof(a)=" & Len(a) & "; sizeof(b)=" & Len(b) & "; sizeof(c)=" & Len(c) End Sub