Visual Basic - Problemas para imprimir

Life is soft - evento anual de software empresarial
 
Vista:

Problemas para imprimir

Publicado por kiquita (17 intervenciones) el 17/07/2003 21:16:34
Tengo una db de access y hay un campo memo el cual almacena datos de un richtextbox y deseo imprimir su contenido pero linea por linea como puedo hacer para detectar el enter y poder imprimirlo uso la instruccion printer
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Problemas para imprimir

Publicado por Antonio REbolledo (4 intervenciones) el 17/07/2003 22:09:34
pues primero tendrias que hacer una funcion que separara las cadenas de tu campo memo...

el algoritmo seria mas o menos asi...

obtener el contenido del campo memo en un text
buscar el primer caracter 13 (enter)
cuando lo encuentres almacenar la posicion en una variable
seleccionar desde el inicio hasta la posision donde encontraste el enter
agregar la seleccion a una list

ahora comienzas a buscar el siguiente enter desde la ultima posicion donde lo encontraste, y lo agregas a la lista...

para imprimir pues solo haces lo siguiente

dim x as integer
printer.print \"Contenido Campo\"
for x = 0 to list1.count - 1
list1.listindex = x
printer.print list1.text
next
printer.enddoc

en pocas palabras
lo que tienes que hacer es meter linea por line en una lista e imprimir el contenido de la lista...
:D

yo asi he hecho muchos programas...

si deseas mas ayuda enviame tu problema y te envio un archivo de ejemplo...

Saludos desde México!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar