The last article of the ticket print series is mainly the code implementation. For the paper settings in this article, please refer to the previous article http://blog.9cbs.net/babyt/archive/2004/09/12/101982.aspx. Set of this http://blog.9cbs.net/babyt/archive/2004/09/11/100989.aspx This article applies to EPSON / STAR / TALLY full range of needle printers, need to pay attention Some printers use their own procedures to control the paper, for the following printers: STAR AR 3200 / 3200 , Star Ar 6400, Tally 2660 requires the use of EPSON 1600K drivers.
Core code Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then If MsgBox ( "To print it?", VbOKCancel vbDefaultButton1, "Printing Tips") = vbOK Then 'Cancel background image Me.Picture = LoadPicture ("") 'Sets the paper type Call Selectform ("Fixed Phone Bill", Me.hwnd)' Print Me.Printform 'Uninstall Form Unload Me End if end ifend SUB
Where selectform is a paper-type selection function, use a function of foreigners, huh, huh. Not much to say, please refer to the full code. Code download, WinRAR3.1 compression, password: www.facesun.cn
