Format$ using "!@" When Value ""

[Don]

I use the following logic to get the value equal to the value in SavSLCust_ShipToCity plus trailing spaces

Format$(SavSLCust_ShipToCity, "!@@@@@@@@@@@@@@@@@@@")

problem is if the value of SavSLCust_ShipToCity is equal "" then the Format$ does not return all spaces. Any ideas on how to change the Format$ so it does return all trailing spaces when value is ""?
Thanks

[Phil Weber]

Instead of Format$, try this:

Dim Buffer As String
Buffer = Space$(20)

LSet Buffer = SavSLCust_ShipToCity

You only have to initialize Buffer once, then use LSet (and/or RSet) to populate it with values.