count line in memo(multi line text)

[yousef]

I want cod of(count line in memo text(multi line text) )

 

[Douglas J Steele]

Since lines are separated by a combination of Carriage Return/Line Feed
(Chr$(13) & Chr$(10), in that order), you can use the following:

(Len([MyMemoField]) - Len(Replace([MyMemoField], Chr$(13) & Chr$(10),
"")))/2