Eli oli tossa tollanen projekti.. ja sinä tarvin tulostus käskyä... Ja ajatteli et jos joku sitä tarvi niin siitä sit vaa testii..
Eli tarvitaa puhdas formi ja siihe tekstikenttä ja commandbuttoni...
Private Sub Command1_Click() Printer.CurrentX = 0 Printer.CurrentY = (297 * 56.7) Printer.Print Text1 'Tulostaa muutujan tai tekstin (nyt tekstikentän) Printer.EndDoc 'Lopettaa tulostimelle syötön eli tulostin alkaa tulosaa End Sub Private Sub Form_Load() Text1.Text = "" 'Tyhjentää tekstikentän aina formin käynistyessä tai avautuessa End Sub
Aihe on jo aika vanha, joten et voi enää vastata siihen.