[AccessD] Remove mulipule vbCrlf From the end of a string?

On 30 Jul 2006 at 18:37, Robert wrote:

>   
>  Does anyone have a procedure handy to Remove multiple vbCrlf From the end
> of a string?
> 

How about something like:

While Right$(strInput, 2) = vbCrLf
    strInput = Left$(strInput, Len(strInput) - 2)
Wend
-- 
Stuart McLachlan