Programacion, vb 6, visual basic, foro programacion

archy.net · #1 (**permalink**) 21-07-2007, 03:59:14

tengo un boton que se llama imprimir pero no tengo el codigo y no se como hacerlo quisiera imprimir los datos que muestra el formulario por ejemplo si le doy clic al boton buscar y me muestra los datos encontrados pues esos datos quisiera imprimirlos pero no se como hacer ayuda plis.

malm82 · #2 (**permalink**) 21-07-2007, 14:32:48

Hola, checa esta pagina, muestra como ver un reporte de forma sencilla, http://www.elguille.info/vb/crystal/...DanielMaya.htm

tambien puedes buscar en este foro temas relacionado a esto, por ahi he puesto algunos codigos de como imprimir, una funcion completa que se utiliza de manera muy sencilla

NOTA: Es para impresion de reportes hecho en Crystal Report,

Tambien Puedes Buscar temas para crear DataReports o imprimir de manera DIrecta
algo asi como esto

Código:

 Dim QImpresora As Printer   'Impresoras

 Set Printer = QImpresora

With Printer
    Printer.PaperSize = 1 'TAMAÑO PAPEL
    .ScaleMode = 6 'Milimetro
    .ScaleHeight = 279 'Milimetros Alto
    .ScaleWidth = 76   'Milimetros Ancho
    .FontName = "FontB11" 'Letra
    .FontSize = 8 'Tamaño letra
    .CurrentX = 4
    .CurrentY = 5 
    Printer.Print "Texto a imprimir"
   .EndDoc 'Se envia la impresión
End With

zesarioll · #3 (**permalink**) 13-04-2009, 19:29:18

Ese Codigo Esta Bueno Pero Donde Se Coloca El Texto A Imprimir Solo Imprime Lo Que Tu Ingresas Por Ejemplo Si Colocas

Auto Te Imprimira Solamente Auto

tatys_2009 · #4 (**permalink**) 12-08-2009, 00:19:14

Cita:

Empezado por archy.net

tengo un boton que se llama imprimir pero no tengo el codigo y no se como hacerlo quisiera imprimir los datos que muestra el formulario por ejemplo si le doy clic al boton buscar y me muestra los datos encontrados pues esos datos quisiera imprimirlos pero no se como hacer ayuda plis.

io tampoco encuentro dime tu encontrastes algo XD

J.M.Movilla · #5 (**permalink**) 12-08-2009, 09:22:03

Claro... Si donde pone "Texto a imprimir" tú pones "Auto", te imprimirá "Auto"; pero si pones Text1.Text, te imprimirá el contenido del textbox... suponiendo que tengas un textbox que se llame Text1... Y si pones rs!Nombre te imprimirá el campo Nombre del recordset rs (suponiendo que ambos datos existan en tu código...)
Como podéis comprender, no es posible dar respuestas que sirvan para cada caso concreto; las "concrecciones" las tiene que hacer cada uno para adaptarlas a su caso personal.

Y ya de paso, os advierto que si no vais cambiando la posición del cabezal, todos los textos que mandéis imprimir, los imprimirá encima del anterior: deberéis poner otra línea con .CurrentX = 62 (por ejemplo) antes de la siguiente línea que podría ser Printer.Print rs!Apellidos...