printen van vb6 naar vb.net

[keesstruijk]

hoi
ben over gestapt van vb6 naar vb 2008
programmeren gaat goed tot dat ik de printer wil de gebruiken
hopeloos en ik kom er niet uit
hier onder de code die ik in vb 6 gebruikte
is er iemand die mij svp wil helpen
hoe schrijf ik dit in vb.net

'''' Briefhoofd ophalen en afdrukken ***********************************************************
strBestand = MapGegevens & "\brief.jpg"
Picture1.Picture = LoadPicture(strBestand)
Printer.PaintPicture Picture1.Picture, 0, 0, 11222, 2050
For line = 1 To 12
Printer.Print '''' Lege regels **************************************************************
Next line

''''Klanten gegevens op de pakbon printen *****************************************************
Printer.Print Tab(50); klant.Winkelnaam
Printer.Print Tab(50); klant.winkeladres
Printer.Print Tab(50); Mid(klant.winkelcode1, 1, 4) & " " & klant.winkelcode2
Printer.Print Tab(50); klant.winkelplaats
If PaginaTeller > 1 Then
Printer.Print Tab(5); " volg pakbon "; PaginaTeller
Else: Printer.Print
End If
Printer.Print Tab(5); " Pakbon no. "; bonnummer & " Datum: "; pakbonkort.datum
Printer.Print ;
With Printer.Font
.Underline = True
.Size = 10
End With
Printer.Print " "
Printer.Print " Aantal Code Omschrijving prijs besteld backOrder "
Printer.Font.Size = 11
Printer.Font.Underline = False

'''' Lijst van de artikelen printen ***************************************************************
For tal = 1 To Pakbon1.tellen
Printer.Print Tab(3); Pakbon2(tal).geleverd;
Printer.Print Tab(10); Mid(Pakbon2(tal).code, 2, 4);
Printer.Print Tab(17); Pakbon2(tal).naam;
Printer.Print Tab(56); Right(Space(8) & Format(Pakbon2(tal).Prijs, "####.00"), 7);

Printer.Print Tab(68); Right(Space(2) & Format(Pakbon2(tal).besteld, "####"), 6);
Printer.Print Tab(76); Right(Space(2) & Format(Pakbon2(tal).bacOrder, "###0"), 6)

Next tal
Printer.EndDoc

Wie wil mij hier bij helpen