Cómo crear un informe en VB

Primero consulte la biblioteca de tiempo de ejecución de Crystal Reports 9 ActiveX Designer

Agregue el control Crystal Repotr View Control 9

Haga clic derecho - Agregar - Crystal Reports 9 en el Explorador de proyectos para crear un nuevo Informes de Crystal Reports 9

Configure la fuente de datos y agregue los campos que se mostrarán en el informe. -Añadido - Crystal Reports 9 para crear un nuevo informe de Crystal Reports 9

Establezca la fuente de datos y agregue los campos que se mostrarán en el informe. Recordset

Private Sub Form_Load()

Dim SQL As String

Dim strConnect As String

\' Crear y vincular objeto Recordset ADO

Set m_Connection = Nuevo ADODB.Connection

Set adoRS = Nuevo ADODB.Recordset

\' Abrir conexión

strConnect = " Tu cadena de conexión de base de datos"

m_Connection.Open strConnect

SQL = "Declaración de consulta"

adoRS.Open SQL, m_Connection, adOpenDynamic.ReportSource = m_Report

CRViewer1.ViewReport (mostrar informe)

Screen.MousePointer = vbDefault

End Sub

Este código es adecuado para VB6+ SP5+Windows2000 Server

El código anterior se refiere a la versión china de Crystal Reports 9