I have problem here..

The picture display to small. How I can large the picture?

My scale mode is - Twip

Code:
Form5.legMapDisp.ExportToBmp (App.path & "\output.bmp")
Printer.CurrentX = 600
Printer.CurrentY = 12000:
'print legend
Printer.Print "Legend": ForeColor = vbBlack
Set Picture2 = LoadPicture(App.path & "\output.bmp")
Printer.PaintPicture Picture2, 60, 13000, 2000, 800