Como faço para imprimir verticalmente usando o printer?

Obs! Não é imprimir uma letra abaixo da outra e sim toda a palavra verticalmente!!

Valeu!!!!!

Experimenta:

Printer.Orientation = 2
Printer.CurrentX = 1
Printer.CurrentY = 10
Printer.Print "texto"

 

Abr...

 

Gideoni, tenho o mesmo problema que o seu, tenho um relatorio ( formato retrato) onde vai impresso uma tabela, nesta tabela deveria apresentar os nomes das colunas na vertical ou pra melhorar em angulo de +- 15º, porem, não encontrei nada que fisesse o Printer colocar a strind na vertical  ( demais testos na horizontal) ou que imprimisse em angulo.

vou continuar na busca, se encontrar algo passarei a vc...

ps: tenho o código que coloca um LABEL na posição que quizer bastando a penas  indicar o angulo, mas não consegui adaptar no printer...