Carriage Return Challenge!!!

[AndyShuter]

In a control box on a report I have the following

=[HirerCurrAddress1] & Chr(13) & Chr(10) & [HirerCurrAddress2] & Chr(13) & Chr(10) & [HirerCurrTown] & Chr(13) & Chr(10) & [HirerCurrPostcode]

This is gret provided that every field has a value as I get the following on my letter

147 Main Street
Clifton
Bristol
BS24 1AW

However, if I get an address where all fields are not required, I get

32 The Square

Bath
BA1 1QR

Just wondered if there was a way of automatically nudging up the text to make the address look nice & neat?

Thanks

 

[Rich]

=[HirerCurrAddress1] & Iif(IsNull([HirerCurrAddress2])," ",& Chr(13) & Chr(10) & [HirerCurrAddress2] etc.