I know it's tricky, but you will have to use the Tab() and Spc() functions.
With some test, you will get want you want.
Exemple of code:
Print #1, vbCrLf; vbCrLf;
Print #1, Tab(42); sDate; Tab(56); sDateInvoiced;
Print #1, vbCrLf;
Print #1, Spc(3); sPhoneNumber;
HTH