VB6 velikost papirja

Hi

Potrebujem nasvet, Nikakor mi ne uspe v VB6 nastaviti željeno velikost papirja (PaperSize). ( 80 mm x 250 mm)
Karkoli poizkusim mi javi napako error = 380.
Če je kdo že delal na podobni stvari prosim za pomoč, hvala.

lp, marko

Tukaj je primer code:

Printer.PaperSize = vbPRPSUser
Printer.ScaleMode = 1  ' skala je v Twips
Printer.ScaleHeight = 14173
Printer.ScaleWidth = 4535

Printer.FontName = "arial"
Printer.FontSize = 10
Printer.FontBold = True
Printer.Orientation = 1

Printer.CurrentX = 150: Printer.CurrentY = 130: Printer.Print "xxx"

Printer.EndDoc

cekr je 24. apr 2017 ob 21:31 izjavil:

Printer.ScaleMode

Nastavi v mm. Potem pa popravljaj.

Kje si dobil ta predpotopni jezik?

Se že kar nekaj let ubadam z njim, pa ni bilo potrebe po nestandardnih velikostih papirja.

Printer.ScaleMode = 6  ' skala je v mm

Sem nastavil v mm, ista napaka error 380,

ta ukaz mi obarva rumeno: Printer.PaperSize = vbPRPSUser

Ali izbrani printer podpira to velikost papirja?

Potem si sam sebi odgovoril kje je napaka--sistem nima pojma iz kje vleci to vrednost. Najverjetneje se v printer settings dialogu nastavi in potem preda naprej tej funkciji.

Google it.

Klasični VB izvira še iz Win3.1 in kasneje win9x...

Zato je v novejših sistemih polno problemov.
Še dobro, da ti sploh deluje.

Raje pojdi na VB.NET 2017. Boš imel manj takšnih preglavic. Je pa res, da je to čisto nekaj drugega.