Printing Current Time

[WaitronUnit]

I am a beginner using VB and have written a simple project in VB6 that sends instructions to a commercial kitchen printer. The user pushes buttons on a touch-enabled screen. It does most of what I need it to do, but I need help with two things:

(1) How do I have it print the time at which the print command was sent (it is going to an Epson receipt printer and it needs to show date and time)?

(2) How can I make the print larger on the ticket? There is no way using the DIP switches on the print device. Also, how can I change the font (it currently prints out 10 pt. Arial)?

(((Here are a few of the lines... I need the time to show up as part of the print job at command35)))

Private Sub Command31_Click()
Printer.Print "REPLENISH —"
Printer.Print " Dessert Section"
End Sub

Private Sub Command32_Click()
Printer.Print "HELP —"
Printer.Print " SP REQ - SEE LINE ATT. !"
End Sub

Private Sub Command33_Click()
Printer.Print " - - - TO GO - - -"
End Sub

Private Sub Command34_Click()
Printer.Print " - - - CXL LAST ORDER - - -"
End Sub

Private Sub Command35_Click()
Printer.EndDoc
End Sub


Thanks to anyone who can point me in the right direction. This is truly the first VB thing I have done and I am having to learn as I go....

 

[PHV]

Wrong forum (here is vbScript)
Search the VB6 forum.

 

[WaitronUnit]

Sorry; I honestly did not know the difference... thanks.

 

[PHV]

You're welcome.
Post here:

http://www.tek-tips.com/threadminder.cfm?pid=222

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244

 

[PHV]

BTW, I guess you can take a look at the Format and Now functions.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244