Is there an easy way to get rid of all the vbCrLf spaces at the end of a string?

example:

dim strExample as string

strExample = "1234" & vbCrLf & vbCrLf & "5678" & vbCrLf & vbCrLf

msgbox strExample
I want strExample to include the 'vbCrLf' in between the 1234 and 5678, but I want all (two in this case) at the end removed. Is there a way to do this easily?

Thanks.