print listbox with tabs

I have a lsitbox with many lines. I used SendMessageArray to line up the listbox into colums... It works perfectly on the screen. How do I print ot like on screen?

When I print it, it comes out like if I wasn't using the SendMessageArray to line it up...


Private Declare Function SendMessageArray Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, lParam As Any) As Long


thanks