how to only show first 20 words of a memo field

[sheniece via AccessMonster.com]

I have a memo field on a form, how can i show the first 30 characters and
add 3 periods after the first 30 words.

 

[Rene]

Use the Left function and add 3 periods:

Left(string, length) & "..."

 

[Rene]

Use the Split Ubound function to get the number of words in your memo.

Dim strWords() As String
Dim iNumber As Integer
strWords = Split(YourMemoAsString, " ")
iNumber = UBound(strWords) + 1

iNumber is how many words there are in your memo.