Dajte molim vas pomozite ..hitno mi je
Kako da ovo uradim...ma link ma bilo što gdje ima materijala ,,ali ne na nekom stranom jeziku
Imam određeni obrazac i na točno određenim mjestima bi mi računalo trebalo
isprintat podatke,,npr ime prezime,,,datum rođenja,te sve podatke upisao sam
u tekst boksove i kad sam poslao printeru on je isprintao cijeli dokument,,s
pozdinom s stvarma koje ne želim da se vide na ispisu,s kučicama ma sa
svim,,,a to ne želim ..želim samo podatke koji se mjenjaju za svaki
obrazac,,
U meni pod opcijom print mi je ovaj kod dolje,,
Private Sub mnuFilePrint_Click()
Dim TotalPages As Integer
Dim PageCount As String
' Specifies the text position to print
Printer.CurrentX = 0
Printer.CurrentY = 0
Printer.Print .......
' Specifies a line width and location
Printer.DrawWidth = 3
Printer.Line (100, 100)-(10000, 100)
Printer.Line (100, 350)-(10000, 350)
TotalPages = Printer.Page
' Specifies where to print the page count
Printer.CurrentX = 1000
Printer.CurrentY = 400
PageCount = "TotalPages = " & Str$(TotalPages)
Printer.Print PageCount
Printer.EndDoc
 |  |
 |
