Programación General > Visual Basic 6.0 e inferiores

 Como Separar Bloques De Texto

(1/1)

karen81:
:huh: hola en el proyecto que estoy realizando tengo un archivo de texto que debo transmitir a una tarjeta para que los cifre el problema que tengo es que este se va cifrando en bloques, se como enviar todo el archivo pero lo debo enviar por bloque  primero los primeros ocho caracteres, luego los otros 8 hasta llegar al final. Mi pregunta es ¿como hago para irme desplazando cada 8 caracteres?


 :) cualquier ayuda sera bienvenida

Gracias :hola:

_vgt_:
mmmm, creo k eso es facil, puedes contar palabras de una cadena de texto con una función de cadenas, creo k es la Len(cadenaTexto) y con el instr puedes ir cortando la cadena de texto desde 1 posicion hasta donde kieras... te hablo de memoria, te lo busco y te confirmo datos... de todas formas andas mal de tiempo  en el msdn de visual vienen explicadas las funciones :-)


Saludo  :hola:

Shiquilla:

--- Código: Text ---Dim lnI As LongDim lsTexto As StringDim lnPos As Long    For lnI = 1 To Len(lsCadenaDeTexto)        If lnI + 8 > Len(lsCadenaDeTexto) Then            lnPos = Len(lsCadenaDeTexto) - lnI + 1        Else            lnPos = 8        End If                lsTexto = Mid(lsCadenaDeTexto, lnI, lnPos)        'Hacer lo que sea con esa cadena        lnI = lnI + 7    Next lnI 
Saludos,

karen81:
:gracias: Muchisimas gracias Shiquilla es justo lo que necesitaba, gracias por tomarte el tiempo y tambien a _vgt_

Adios :jumpie:

Navegación

[0] Índice de Mensajes