Print help

[tiguy]

Hi All

I'm new to Vb.net. I've been working with vb6.0 for years now. I'm trying to look at VB2005. I have been using the printer.print but i think i will have to print to a file then print that txt file. So with that said i've been looking for a good way to print but have had no luck. My old code looks like this.

I was hoping someone could help.

Reston


VB CODE +++++++++++++++++++++++++++++++++++++++++++++
Private Sub cmdPrint_Click()
Ace = 69
If Chk1 = 0 Then MousePointer = 11
If Chk1 = 0 Then Printer.Font.Size = 10
If Chk1 = 0 Then Printer.Print ""
If Chk1 = 0 Then Printer.Print ""
If OptConvex.Value = True Then XX = " CONVEX"
If OptConcave.Value = True Then XX = " CONCAVE"

'Printer.Print ""
If Chk1 = 0 Then Printer.Print ""
If Chk1 = 0 Then Printer.Print ""
If Chk1 = 0 Then Printer.Print Tab(10); "OC"
If Chk1 = 0 Then Printer.Print Tab(10); "Job: "; Text1.Text
If Chk1 = 0 Then Printer.Print Tab(10); Format(Now, "m/d/yyyy")
If Chk1 = 0 Then Printer.Print Tab(10); Format(Now, "hh:mm AM/PM")
If Chk1 = 0 Then Printer.Print "___________________________________________________"

If Chk1 = 0 Then Printer.Print ""
If Chk1 = 0 Then Printer.Print Tab(10); "TRC"; Tab(52); txtROC & "''" + XX
If Chk1 = 0 Then Printer.Print ""
If Chk1 = 0 Then Printer.Print Tab(10); "Sr"; Tab(52); txtSf & "''"
If Chk1 = 0 Then Printer.Print ""If Chk1 = 0 Then Printer.Print " "
'Printer.Print Tab(10); "MLBT"; Tab(52); Val(lblTable)
'Printer.Print " "
'Printer.Print Tab(10); ""; Tab(52); Val(lblTable)
If Chk1 = 0 Then Printer.Print " "
If Chk1 = 0 Then Printer.Print " "
If Chk1 = 0 Then Printer.Print "____________________________________________"
If Chk1 = 0 Then Printer.EndDoc

[jmcilhinney]

VB.NET printing is completely different to VB6. The 2003 101 Samples from Microsoft contain a printing example. You can open the 2003 samples in 2005 without issue and the printing mechanism hasn't changed.

[JuggaloBrotha]

look into the PrintDocument, PrintDialog and possibly the PrintPreviewDialog or the PrintPreviewControl