Printing with text only printer

[madmark2]

I am having problems printing out list box data. I'm using a text only printer. In the list box i have tabs set when it prints to the printer it prints the value in column 1 TAB value in cloumn 2 TAB...... If the column width changes it throws everything off????

Can't to a printform because of text only printer.

[wengang]

Hi.
I don't know if this will help you, but I previously had a similar problem with what you are having.
what i did was just to write a code to send the info thru a loop and join it altogether as one variable and then print the variable. Of course that doesn't help to line it up.

Before doing that, I sent the list items 1 by 1 thru a loop to add spaces to the end of the strings until all strings were the same size:
For integer = 1 to (number of items in the list)
Do
If Len(strText(integer))<25 Then strText = StrText(integer) & "0"
Loop until Len(strText(integer)) = 25
Next integer

Then I put them together in blocks using & vbCrLf when concatenating.

Well, maybe this isn't the help you need , but hope it's useful to sb.
Cheers.

[madmark2]

That seems like it would work although it may take some time to do as much info as i have on a form and they need this program done asap like this evening....lol

Is there neway to just take the contents as apears on screen and print to a text printer...

The program is a ticket program that prints weights in different columns... along with date customer vechicle desc and trans numbers at the top