Ver Mensaje Individual
  #6 (permalink)  
Antiguo 20/09/2011, 08:51
Avatar de lokoman
lokoman
 
Fecha de Ingreso: septiembre-2009
Mensajes: 502
Antigüedad: 15 años, 1 mes
Puntos: 47
Respuesta: No me aclaro con el data report

Hola!!
No te compliques!!

Crea un Form, dale el formato que quieres y preséntalo, solo tienes que cargar los datos... sigue este ejemplo:

http://www.vb6.us/tutorials/printing-form-visual-basic


Código vb:
Ver original
  1. Option Explicit
  2.  
  3. Private Sub cmdGENERAR_INFORME()
  4.     frmINFORME.Top = (Screen.Height - Me.Height) / 2
  5.     frmINFORME.Left = (Screen.Width - Me.Width) / 2
  6.  
  7.     'display date & time
  8.    lblDate.Caption = Format$(Date, "dd/MM/yyyy")
  9.     lblTime.Caption = Format$(Time, "h:nn AM/PM")
  10.  
  11. 'LOS CAMPOS
  12.  
  13.    lblCOPIAS.CAPTION=frmPRESUPUESTO.txtCOPIAS.TEXT
  14.    lblDESCRIPCION.CAPTION=frmPRESUPUESTO.txtDESCRIPCION.TEXT
  15.    lblCANTIDADPAPEL.CAPTION=frmPRESUPUESTO.txtPAPELTEXT.TEXT
  16.    lblTIEMPO.CAPTION=frmPRESUPUESTO.txtTIEMPO.TEXT
  17.    '...
  18.   '...
  19.   '...
  20. End Sub
  21.  
  22. Private Sub cmdPrint_Click()
  23.     cmdPrint.Visible = False
  24.     cmdExit.Visible = False
  25.    
  26.     PrintForm
  27.    
  28.     cmdPrint.Visible = True
  29.     cmdExit.Visible = True
  30. End Sub
  31.  
  32. Private Sub cmdExit_Click()
  33.     End
  34. End Sub


Nos cuentas!!