|
|
Postada em 13/02/2006 12:35 hs
Amigos, sei que para definir em papel a4 é: Printer.PaperSize = vbPRPSA4 e para definir em papel ofício, como ficaria ? Estou desenhando um layout no paint. Para pegar esse layout estou fazendo assim: Private Sub Command1_Click()
Picture1.Picture = LoadPicture("C: esteIMAGEimage.bmp")
ImprimeLayOut Printer
Printer.EndDoc
End Sub
Private Sub ImprimeLayOut(LayOut As Object)
Printer.PaperSize = vbPRPSA4
LayOut.PaintPicture Picture1.Picture, 0, 0
End Sub Está ocorrendo o seguinte: Quero deixar apenas 1/2 cm na margem superior e 1/2 cm na margem inferior, o desenho é um quadrado, mas deve ficar no tamaho da folha de sulfite, descontando os 1/2 que quero. deu para endender ? Obrigada |
|
|
|
|
|
kerplunk
|
SÃO PAULO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 13/02/2006 15:06 hs
divirta-se Constante Valor Descrição
vbPRPSLetter 1 Letter, 8 1/2 x 11 in.
vbPRPSLetterSmall 2 Letter Small, 8 1/2 x 11 in.
vbPRPSTabloid 3 Tabloid, 11 x 17 in.
vbPRPSLedger 4 Ledger, 17 x 11 in.
vbPRPSLegal 5 Legal, 8 1/2 x 14 in.
vbPRPSStatement 6 Statement, 5 1/2 x 8 1/2 in.
vbPRPSExecutive 7 Executive, 7 1/2 x 10 1/2 in.
vbPRPSA3 8 A3, 297 x 420 mm
vbPRPSA4 9 A4, 210 x 297 mm
vbPRPSA4Small 10 A4 Small, 210 x 297 mm
vbPRPSA5 11 A5, 148 x 210 mm
vbPRPSB4 12 B4, 250 x 354 mm
vbPRPSB5 13 B5, 182 x 257 mm
vbPRPSFolio 14 Folio, 8 1/2 x 13 in.
vbPRPSQuarto 15 Quarto, 215 x 275 mm
vbPRPS10x14 16 10 x 14 in.
vbPRPS11x17 17 11 x 17 in.
vbPRPSNote 18 Note, 8 1/2 x 11 in.
vbPRPSEnv9 19 Envelope #9, 3 7/8 x 8 7/8 in.
vbPRPSEnv10 20 Envelope #10, 4 1/8 x 9 1/2 in.
vbPRPSEnv11 21 Envelope #11, 4 1/2 x 10 3/8 in.
vbPRPSEnv12 22 Envelope #12, 4 1/2 x 11 in.
vbPRPSEnv14 23 Envelope #14, 5 x 11 1/2 in.
vbPRPSCSheet 24 C size sheet
vbPRPSDSheet 25 D size sheet
vbPRPSESheet 26 E size sheet
vbPRPSEnvDL 27 Envelope DL, 110 x 220 mm
vbPRPSEnvC3 29 Envelope C3, 324 x 458 mm
vbPRPSEnvC4 30 Envelope C4, 229 x 324 mm
vbPRPSEnvC5 28 Envelope C5, 162 x 229 mm
vbPRPSEnvC6 31 Envelope C6, 114 x 162 mm
vbPRPSEnvC65 32 Envelope C65, 114 x 229 mm
vbPRPSEnvB4 33 Envelope B4, 250 x 353 mm
vbPRPSEnvB5 34 Envelope B5, 176 x 250 mm
vbPRPSEnvB6 35 Envelope B6, 176 x 125 mm
vbPRPSEnvItaly 36 Envelope, 110 x 230 mm
vbPRPSEnvMonarch 37 Envelope Monarch, 3 7/8 x 7 1/2 in.
vbPRPSEnvPersonal 38 Envelope, 3 5/8 x 6 1/2 in.
vbPRPSFanfoldUS 39 U.S. Standard Fanfold, 14 7/8 x 11 in.
vbPRPSFanfoldStdGerman 40 German Standard Fanfold, 8 1/2 x 12 in.
vbPRPSFanfoldLglGerman 41 German Legal Fanfold, 8 1/2 x 13 in.
vbPRPSUser 256 User-defined
|
|
|
|
|
