Lunghezza stringa in file random

[energie83]

Salve, volevo sapere come è possibile in un file random calcolare l'esatta lunghezza della stringa e dirlo a file nella dichiarazione del record.
es. private type rec
nome as string *10
end type
ecco vorrei evitare di dichiarare quel 10 xche all'atto di una ricerca son costretto a utilizzare tutti e 10 i caratteri per far si che la ricerca abbia successo!
es. il nome da cercare è alex (4caratt.) ne ho memorrizzati 10(alex +6spazi), devo perforza scrivere alex+6spazi per trovare il nome!

[optime]

trim(stringa) ti restituisce la stringa senza spazi iniziali e finali

[energie83]

si scusa,ma dove dovrei inserire questo??!?!?scusa l'ignoranza

[erme2]

dim nome as string

nome = "alex      " '("alex"+6 " "spazi)
nome = trim("alex      ")  ' ("alex" senza spazi)

comunque guardati la funzione trim() sulla guida è molto chiaro il funzionamento

[energie83]

ecco in fase di registazione è cosi:
Private Type rec
num As String * 10
numer As String * 10
End Type
Dim r As rec
Dim numero As String

Private Sub Command1_Click()
Open "c:\prova.txt" For Random As #1 Len = Len(r)
r.num = Text1.Text
r.numer = Trim(r.num)
l = LOF(1) / Len(r) + 1
Put #1, l, r.numer
Close #1
End Sub

ma memorizza il primo dato immesso e l'ultimo! dove sbaglio????