Removing Text If Null

[lewis1682]

I have some address labels set out in the following way.
Title FirstName LastName
JobTitle
Company
AddressLine1
AddressLine2
Town


County
PostalCode

How can I create this so if some field is left blank then that field is deleted and everthing moved up one. For example: if JobTitle and Company were blank I would want them to be deleted and the fields below them to move up so no spaces are left if it is null. Do you understand me?

Thank you for your help.

[pbaldy]

I do this in the format event of the appropriate section:

  Me.txtName = (CustAttn + vbCrLf) _
             & (CustomerName + vbCrLf) _
             & (CustomerAddress1 + vbCrLf) _
             & (CustAddress2 + vbCrLf) _
             & (CustAddress3 + vbCrLf) _
             & (CustAddress4 + vbCrLf)