Buscar

VB: separar string en tokens


 
 Old 03 ago 2005, 08:37   #1 (permalink)  
Miembro activo
 
Avatar de margisen
 
Registrado: marzo 2005
Ubicación: Valencia
Mensajes: 593

Predeterminado VB: separar string en tokens

Hola,
Es posible en Visual Basic cojer un campo Memo de una tabla y almacenarlo en una variable de tipo String, y a partir de esta variable ir particionanándola en tokens? Parecido a lo que en Java se hace con la función stringTokenizer...

La idea es depurar ese campo largo: quitar varios espacios seguidos, posibles palabras juntas repetidas... Y después machacar el campo antiguo por el nuevo depurado.

Un saludo.

A caballo regalado, patá en los huevos!
margisen is offline   Citar y responder
 
 Old 03 ago 2005, 16:12   #2 (permalink)  
Moderador
 
Avatar de the_ma3x
 
Registrado: febrero 2005
Ubicación: México
Mensajes: 4.325

Predeterminado Re: VB: separar string en tokens

Ok,
Si el concepto del StringTokenizer es el que lei...

Dim strPalabras() As String

strPalabras = split(strCampoMemo, " ")

Con esto dividiras el string strCampoMemo en varios substrings en la variable strPalabras que se volvio un Array.

Para recorrerlo...

Dim X as Integer

For X = LBound(strPalabras) to UBound(strPalabras)
Msgbox strPalabras(X)
Next X

Espero te sirva
Saludos

Every wall is a door. Ralph Waldo Emerson
the_ma3x is offline   Citar y responder
 
 Old 03 ago 2005, 16:46   #3 (permalink)  
Miembro activo
 
Avatar de margisen
 
Registrado: marzo 2005
Ubicación: Valencia
Mensajes: 593

Predeterminado Re: VB: separar string en tokens

Cita:
the_ma3x escribió:
Ok,
Si el concepto del StringTokenizer es el que lei...

Dim strPalabras() As String

strPalabras = split(strCampoMemo, " ")

Con esto dividiras el string strCampoMemo en varios substrings en la variable strPalabras que se volvio un Array.

Para recorrerlo...

Dim X as Integer

For X = LBound(strPalabras) to UBound(strPalabras)
Msgbox strPalabras(X)
Next X

Espero te sirva
Saludos
Muchas gracias the_ma3x. Era lo que buscaba. Ahora lo aplicaré a todos los campos de la tabla a ver el resultado.

Un saludo

A caballo regalado, patá en los huevos!
margisen is offline   Citar y responder

« que libro me recomiendan | Visual Basic y BDs. Dos preguntas (Contestadas) »

Herramientas
Estilo


 

Tema Iniciado por Foro Respuestas Último mensaje
Cómo imprimir un TextBox en VB 6.0 ignacio.navarro Programación 2 24 jun 2005 15:00
turtorial Visual Basic 1 liceto Programación 7 06 jun 2005 01:41



Buscar