hola tengo un desafio "" si alguien ya lo sabe
miren tengo un datagrid o una base de datos con muchas fraces el cual yo tengo que hacer un filtro V/S un dicionario en BD
recorrer y preguntra por una frace o palabra es facilparte
ejemplo
'--------------
cadena=" empresa juanito peres sociedad anonima limitada, amigos compadres y parientes "
cadena = Trim(cadena)
palabras = Split(cadena, " ")
totalpalabras = UBound(palabras)
For CPal = 0 To totalpalabras
x_PalabraActual = palabras(CPal)
x_letra = Mid(x_PalabraActual, 1, 1)
'------------------buscar por palabras solas-----------------------------
rs_BuscarDicionario.Open "Select * From Dicionario where actual = '" & x_PalabraActual & "' and letra_comienzo = '" & x_letra & "'", AccessConexion, adOpenKeyset, adLockOptimistic
If rs_BuscarDicionario.EOF Or rs_BuscarDicionario.BOF Then
palabraCompuesta = palabraCompuesta + " " + palabras(CPal)
Else
rescate = Trim(UCase(rs_BuscarDicionario!cambio))
palabraCompuesta = palabraCompuesta + " " + rescate
End If
rs_BuscarDicionario.Close
Next
palabraCompuesta
'-------------------------------------------------------------------------
mi base de datos esta compuesta por
actual ;cambio ;letra_comienzo
limitada ,ltda ;l
'-----------------------------------------
asi funciona bien tanto el ejercicio para fraces completas y palabras solas pero mi pregunta para simplificar mas la cosa, como hago para que busque en dos palabras??
como Sociedad Anonima a simplificarla en un S.A
actual ;cambio ;letra_comienzo
limitada ,ltda ;l
sociedad anonima ,S.A ;s
PS= no me sirve usar
x_PalabraActual = palabras(CPal)+ " "+palabras(CPal+1)
eso puede caerce ,,,,,,,,,, estoy pensando con un like ...O.o aun asi no se como?? empezar saludos
[email protected]
