USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Desenhar quadrados com o object printer
Horta
RECIFE
PE - BRASIL
Postada em 04/04/2006 07:19 hs            
Alguem me ajuda a fazer uma função que me permita imprimir um determinado nº de quadrados ou rectangulos numa determinada área da folha, quer vertical ou horizontalmente
 
Ex: Preciso imprimir 10  linhas com 30 quadradros cada , evitando estara a digitar tudo por cada quadrado (coordenadas) .
Agradeço desde já
 
     
ghost_jlp
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 04/04/2006 11:35 hs            

Cara eu não testei mas tenta assim:

Printer.Line (1000, 2000)-(5000, 2000), vbRed
'Draw down from end of Min line
'don't change X pos
'change Y pos by 4000
Printer.Line Step(0, 0)-Step(0, 2000), vbRed
'draw across 'change X pos by -4000
'don't change Y pos
Printer.Line Step(0, 0)-Step(-4000, 0), vbRed
'draw up
'don't change X pos
'change Y pos by -4000
Printer.Line Step(0, 0)-Step(0, -2000), vbRed
Printer.EndDoc

ou assim:

Printer.Line (1000, 2000)-(5000, 4000), vbRed, B
Printer.EndDoc

qq coisa é só postar

 

t+

TÓPICO EDITADO
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página