Hallo,
die Variable frei muss vom Typ String sein, z.B.
Dim frei AS Strong * 10 , wenn sie max, 10 Zeichen hat.