Re: Printing to only USB printer



Thanks but no it didn't work.... something so simple to do and I can't
figure out how to do it... I have been searching for days and finding
nothing on formatting a whole line of concatenated text... It can't be that
hard to do...




"J French" <erewhon@xxxxxxxxxx> wrote in message
news:433d53e6.116429898@xxxxxxxxxxxxxxxxxxxxxxx
> On Fri, 30 Sep 2005 13:37:08 GMT, "F L A S H" <flash@xxxxxxxxx> wrote:
>
>>Thanks, do you have any links that will provide more information on
>>setting
>>this up?
>>
>>Also, I am trying to print a line on my label that looks like this: "pro:
>>1234567"
>>
>>and my code to do this looks like this:
>>
>>Print_Line = Val(txtPro.Text)
>>numlabels = Val(txtNumPros.Text)
>>Print_ProConst = "pro:"
>>
>> For i = 1 To numlabels
>> Printer.Font = "arial": Printer.FontSize = 15: Printer.FontBold =
>>False
>> Printer.Print Print_ProConst; Spc(1);
>> Printer.Font = "arial": Printer.FontSize = 55: Printer.FontBold =
>>True
>> Printer.Print Print_Line
>> On Error Resume Next
>> Call ClearTextBoxes(Me)
>> txtPro.SetFocus
>> Printer.NewPage
>> Next i
>>
>> Printer.EndDoc
>>
>>Is there a more efficient or better way to do this? The only reason I ask
>>is because in Win 98 it looks like "pro: 1234567" but in XP it only prints
>>"1234567" and leaves out the "pro:". It may be a driver issue or printer
>>setup issue of some sort.
>
> Get rid of the On Error Resume Next and see what pops up
>
>


.