You have to grab what was set in the Print Dialog and use it to print more than one copy (create a loop)

Printer.Copies = printDlg.Copies

Look here for more info: http://support.microsoft.com/kb/322710