se saigià da primo che la stringa sarà lunga 10 caratteri fai così:

dim var as string*10

e nella variabile var ci entreranno max 10 caratteri

se invece fai così:

dim var as string

e poi ci metti dentro 10 caratteri la stringa sarà grande 30 byte invece che 10 come nel caso precedente