Título: VB6, acceso a fichero Publicado por: programatrix en 1 Abril 2014, 00:14 am Hola, ¿que tal?
He puesto este mensaje por si me podriaís dar referencia de instrucciones o código de como puedo leer en un fichero con cosas asi: Citar Catheter 6 Necesito tomar esos datos del fichero para trabajar en ellos, realmente es una parte de un trabajo en un problema físico de calculo de dosis en tratamientos de cancer. (Son varios cateter y por cateter 39 puntos con ese formato)Begin Number of Points 39 Point 0 Begin Coordinates 67.336888 52.054878 -2.064480 Status Active Weight 0.303272 End End Y bueno si me podeís dar bibliografía de acceso a ficheros o códigos para leer datos como estos estaría muy agradecido. Muchas gracias :) Título: Re: VB6, acceso a fichero Publicado por: Danyfirex en 1 Abril 2014, 14:53 pm Hola. la verdad no entiendo ni papa.
te refieres a leer un archivo? Código
saludos Título: Re: VB6, acceso a fichero Publicado por: programatrix en 1 Abril 2014, 15:28 pm Me refiero a un fichero con ese formato el cual elabora un programa planificador, poder desde un programa mio leerlo y obtener posiciones de la fuente radiactiva y tiempo en dicha posición.
Hay aproximadamente 111 posiciiones con su tiempo, y quiero leer todo eso pasando practicamente de otros datos. Título: Re: VB6, acceso a fichero Publicado por: Mad Antrax en 1 Abril 2014, 16:28 pm Si es con ese formato, yo me posicionaría en el archivo con InStr() y Split()
Título: Re: VB6, acceso a fichero Publicado por: 79137913 en 1 Abril 2014, 20:18 pm HOLA!!!
Yo leeria todo con un: Código
Asi en cada punto del array tenes una instruccion sin espacios GRACIAS POR LEER!!! Título: Re: VB6, acceso a fichero Publicado por: programatrix en 9 Abril 2014, 23:12 pm Código: Open App.Path & "\Datos\test.cha" For Input As #1 Citar 67.336888 52.054878 -2.064480 Y otro listado de los tiempos:Citar 0.303272 Y uso la función trim para quitar los espacios en blanco pero no consigo hacerlos desaparecer, ni tratar el texto ni nada no entiendo :SPorque ya teniendo esas cadenas deberían ser fáciles de tratar, ¿No? Título: Re: VB6, acceso a fichero Publicado por: MCKSys Argentina en 10 Abril 2014, 02:41 am Y uso la función trim para quitar los espacios en blanco pero no consigo hacerlos desaparecer Revisa la función replace: http://www.vb6.us/tutorials/vb6-string-functions (http://www.vb6.us/tutorials/vb6-string-functions) Saludos! Título: Re: VB6, acceso a fichero Publicado por: programatrix en 15 Abril 2014, 23:59 pm Al final resolvi el problema, dejo parte del código por si a alguien le es útil, este código se encarga de ver cuantos puntos existen en el fichero para poder tomar los datos en una matriz posteriormente de esos elementos:
Código: leerpcateter = False |