Los controles en el código que hacen referencia al informe de datos en VB no son válidos. ¿Por qué?
Según la fuente, el consumidor de datos está vinculado a una base de datos; el segundo es DataMember, que está configurado por varios miembros de datos proporcionados por DataSource.
Establezca miembros de datos específicos; tercero, margen izquierdo, margen derecho, margen superior, margen inferior, etc. para especificar.
Los márgenes izquierdo, derecho, superior e inferior del informe; el cuarto tipo son las Secciones, que son el encabezado del informe, el encabezado de la página, los detalles, las notas al pie de la página y el periódico de DataReport.
Hay cinco campos en el pie de página de la tabla. Si agrega un grupo (el grupo puede tener varios niveles), agregue un par de áreas, a saber, el encabezado del grupo y el pie de página del grupo. Ese
DataSource suele ser un entorno de datos o una variable de tipo ADODB. conexión, mientras que DataMember corresponde al anillo de datos.
Para variables de tipo ADODB, se recomienda utilizar el entorno de datos y los comandos. Se determinan el conjunto de registros en el entorno y los límites de la página.
Todo está claro. A continuación presentaré principalmente varias secciones, que también son la esencia de DataReport.
Secciones es una colección. Puede darle un nombre a cada sección de arriba a abajo o usar su índice predeterminado.
1, 2... Cada sección tiene propiedades de altura y visibilidad, y bajo ciertas condiciones puedes hacer que una sección sea indispensable.
Se pueden colocar varios controles de informe en la Sección, incluidos RptLabel, RptImage, RptShape y RptLine.
En cualquier sección, se usa para generar varios textos, gráficos y líneas de tablas; RptTextBox solo se puede colocar en detalles y generalmente se usa para vincular.
El campo de datos de salida fijo proporcionado por RptFunction solo se puede colocar en el pie de página del grupo para la salida y usar varios internamente.
Establezca el número total, valor máximo, valor mínimo, valor promedio, recuento, etc. calculado por la función. Las propiedades públicas * * * en el control de informe anterior se utilizan para
controlar la parte superior, izquierda, altura, ancho de la posición y altura, y controlar la visibilidad entre ellos, RptTextBox también tiene
campos de datos, miembros de datos, formato de datos y propiedades de fuente; no diré mucho sobre otras propiedades.
A continuación os presentaré mi experiencia. Una es nombrar el control de informe que desea controlar periódicamente según el tipo; la segunda es utilizar RptShape.
Es mucho más fácil usar cuadros rectangulares para crear estructuras alámbricas de tablas que usar cuadros RptLine. La línea RPT solo se usa para líneas diagonales; la tercera es el título del informe y el informe. El texto del encabezado, la fecha y el número de página en
son RptLabel, donde el atributo Caption admite caracteres de escape, D es la fecha de formato largo y d es.
Fecha en formato corto, P es el número total de páginas y p es el número de página actual. Cuarto, para informes fijos, coloque los controles del informe directamente en la ventana de diseño.
Para informes en vivo, primero considere el informe más grande y coloque suficientes controles en diferentes áreas, independientemente de la ubicación o el tamaño.
Profundice y utilice código VBA para ajustar las propiedades de todos los controles, incluida la posición, la altura, el ancho, la fuente,
alineación, el formato de visualización, la visibilidad y más. , la altura y la visibilidad del tramo de carretera correspondiente también deberán adaptarse según la situación.
Finalmente, se utiliza una plantilla de ejemplo para ilustrar su uso.
Conectar la base de datos
con el entorno de datos. Nombre del comando RS
if. Estado = adStateOpen Entonces. Cerrar
. Fuente = instrucción SQL
. Abrir para salida Abre el elemento de datos de la base de datos para salida.
Termina en
Con el nombre del informe
. datasource=entornodedatos
Líneas. DataMember =El nombre del comando también se puede fijar y no es necesario configurarlo cada vez.
Establezca la sección del encabezado (RpttLabel... es el nombre del control del informe)
. Sección (2). control("rptlabelpage"). Título = "* * página p"
. Sección (2). control("rptlabeldate"). caption = "Imprimir fecha: D "
. Párrafo (3). control("RptLabel1"). Left =…
…
Detalles de la colección (RptShapeX y RptTextBoxX son nombres de control de informes)
. Párrafo (3). control("RptShape1"). Izquierda=…
. Párrafo (3). control("RptShape1"). Arriba=…
. Párrafo (3). control("RptShape1"). Altura=…
. Párrafo (3). control("RptShape1"). ancho=…
. Párrafo (3). Control ("RPTTextBox1"). miembro de datos = nombre del comando.
. Párrafo (3). Control ("RPTTextBox1"). campo de datos = campo1.
. Párrafo (3). Controles ("RptTextBox1").
…
. Párrafo (3). control("RptShapeN"). visible = falso
. Párrafo (3). control(" RptTextBoxN "). visible=falso
. Párrafo (3). altura = altura calculada o fija del detalle.
Ajuste dinámicamente el título del informe (RptLabelTitle es el nombre del control de etiqueta del informe)
. Sección (2). control("RptLabelTitle"). Izquierda =…
. Sección (2). control("RptLabelTitle"). Alineación=…
Después de completar el ajuste
. Mostrar o. Imprime el informe
Termina con...
La ventaja de esto es que el diseño del informe es simple y fácil de ajustar. Sólo necesitas modificar un poco el código, no un poco.
Me tomó mucho tiempo modificar y ajustar en la ventana de diseño.
El código anterior debe escribirse en el evento Load del formulario DataReport.
El nombre rsCommand es el nombre del comando establecido en el entorno de datos de DataReport. Ese es el orden.
2.
A menudo utilizamos la impresión de informes en la programación de bases de datos.
Entre ellos, datareport es un control que imprime informes uno por uno.
Si desea mejores efectos de impresión, debe utilizar Crystal Reports.
En primer lugar, ¿cómo imprime el informe datareport?
(1) Primero seleccione Mocrosoft Data Report Designer V6.0 en la referencia.
Luego agregue el control en el diseñador.
(2) Llame al diseñador para imprimir el formulario.
El código de muestra es el siguiente:
Establecer ff como informe interno
Establecer ff. fuente de datos = rs
si Cmbstore. Envía un mensaje de texto a lt gt "" o Cmbstore. Texto lt gt Luego déjelo vacío
Un pedazo de papel secciones(" sección 2 ") controla el elemento ("lostore"). Título = Cmbstore.
Texto
Otro
Una hoja de papel secciones(" sección 2") controla el elemento(" lostore "). title = " "
Terminará si...
Si Cmbistore. Envía un mensaje de texto a lt gt "" o Cmbistore. Texto lt gt Luego déjelo vacío
Un pedazo de papel secciones(" sección 2 ") controla el elemento (" listore "). Título = Cmbistore. texto
Otro
Una hoja de papel secciones(" sección 2 ") controla el elemento (" listore "). title = " "
Terminaría si...
Si Tdjh. Envía un mensaje de texto con lt gt" "o Tdjh. Texto lt gt Luego déjelo vacío
Un pedazo de papel secciones(" sección 2 ") controla el elemento ("ldjh"). Título = Tdjh. Texto
Otro
Una hoja de papel secciones(" sección 2 ") controla el elemento ("ldjh"). title = " "
Terminará si...
Abrir "select * from CompanyInfo" cuando..., cn, 3, 2
Si la temperatura . EOF = Falso entonces
Una hoja de papel secciones(" sección 2 ") controla .item(" l empresa "). title = trim(temp.fields
(0)) 'company_name
terminará si es 2"). control. Artículo("LTítulo"). caption = "Doc "
Un trozo de papelCaption = "Imprimir"
Cerrar cuando...