Jhkjhklkldsjalkdhalknhdla

En esta ocasión veremos la manera de mostrar un reporte sencillo. La apariencia final de nuestra aplicación será la siguiente:
 
Al presionar el botón Imprimir, se abrirá la siguiente pantalla:

Nuestro proyecto de llama proReportes, y deberá quedar organizado de la siguiente manera:

Utilizamos una base de datos llamada dbPrac.mdb, la cual contiene una tabla llamada CAT_CLIENTES. En elarchivo adjunto viene tal base de datos. Por adelantado te digo que esta conformada (la tabla) de la siguiente manera:
 
Campo | Tipo | Descripción |
ID_CLIENTE | TEXTO | Campo llave |
PATERNO | Texto | Apellido paterno |
MATERNO | Texto | Apellido materno |
NOMBRE | Texto | Nombre |
RFC | Texto | RFC |
DIRECCION | Texto | Dirección |
TELEFONO | Texto | Telefono |
LIM_CRED| Doble | Límite de crédito |
Al formulario frmCatClientes, le agregamos 8 TextBox y 8 Label, con las siguientes características:
Objeto(nombre) | Tipo | Propiedad | Valor |
txtID_CLIENTE | TextBox | Text | (vacío) |
txtPATERNO | TextBox | Text | (vacío) |
txtMATERNO | TextBox | Text | (vacío) |
txtNOMBRE | TextBox | Text | (vacío) |
txtRFC | TextBox | Text | (vacío) |txtDIRECCION | TextBox | Text | (vacío) |
txtTELEFONO | TextBox | Text | (vacío) |
txtLIM_CRED | TextBox | Text | (vacío) |
lblID_CLIENTE | Label | Text | Clave |
lblPATERNO | Label | Text | Paterno: |
lblMATERNO | Label | Text | Materno: |
lblNOMBRE | Label | Text | Nombre: |
lblRFC | Label | Text | RFC |
lblDIRECCION | Label | Text | Dirección: |
lblTELEFONO | Label | Text |Teléfono: |
lblLIM_CRED | Label | TExt | Límite de crédito |
Images | ImageList | | |
barBotones | ToolBar | | |
Agrega imágenes al ImageList y botones al ToolBar (que se parezcan a las arriba mostradas). En el archivo adjunto incluiré las imágenes (en realidad son iconos) que utilice para este ejemplo. 
Agrega también un MainMenu como se muestra:

Al formulario frmReportes, agregaun CrystalReportViewer y ponle como nombre crvReportes, y el la propiedad Dock del Viewer selecciona Fill. El formulario debe quedar como se muestra:

Ahora agregaremos un DataSet, este nos servirá para enlazar nuestro reporte con los datos. Pon mucha atención a lo que a continuación se muestra:
1. Agrega un nuevo elemento(DataSet):

Aparece algo como lo siguiente:

2. Selecciona Exploradorde Servidores.

3. Con el botón derecho del mouse, sobre Conexiones de datos, selecciona Agregar conexión...

4. Conéctate a la base de datos de Access:
 
5. Después de lo anterior, aparece (más o menos) así el Explorador de servidores:

6. Expande la conexión (tal como se muestra en la figura) y arrastra la tabla CAT_CLIENTES como se muestra:

7. Cierra el Explorador de servidores,graba los cambios y ¡listo!, terminamos el DataSet.
Ahora crearemos nuestro reporte:
1. Agrega un nuevo elemento al proyecto (CrystalReports). Pon el nombre rptCatClientes y presiona Abrir:

2. Selecciona Mediante el asistente de informes y presiona Aceptar:

3. Expande como se muestra a continuación:

4. Selecciona la tabla CAT_CLIENTES y presiona el botón Insertar tabla.Presiona Siguiente.

5. Agrega todos los campos (con el botón Agregar). Ve a la casilla Estilo, escribe el título del reporte (Catalogo de Clientes) y presiona Finalizar.
Ahora vamos a programar  ...
Código:
Primero el código de clsMain:

Public Class clsMain
''Esta es la cadena de conexión
''Es necesaria para obtenerconectividad con la base de datos
Public CnnStr As String = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=..\Data\dbPrac.mdb;" & _
"Persist Security Info=False "
End Class

Después del código del formulario (frmCatClientes):...