Hola amigos!!!
Existe alguna función que quite los acentos? o me tengo que currar yo algo? Imagino que ya hay algo hecho, me podríais indicar????
Para .NET con Visual Basic.
Gracias!!!
| |||
| .NET Basic - Funcón quitar Acentos Hola amigos!!! Existe alguna función que quite los acentos? o me tengo que currar yo algo? Imagino que ya hay algo hecho, me podríais indicar???? Para .NET con Visual Basic. Gracias!!! |
| |||
| Respuesta: .NET Basic - Funcón quitar Acentos esto es precisamente lo que estaba buscando y he encontrado un ejemplo
Código:
Voy a comprobar a ver que es lo que hace esto.Tengo una funcion para eliminar acentos con .NET FrameWork 2.0 :
Imports System
Imports System.Text
Imports System.Text.RegularExpressions.Regex
Dim reg As RegularExpressions.Regex
Dim textoOriginal As String = "Mañana será otro dÃ*a"
'transformación UNICODE
Dim textoNormalizado As String = textoOriginal.Normalize(NormalizationForm.FormD)
'coincide todo lo que no sean letras y números ascii o espacio
'y lo reemplazamos por una cadena vacÃ*a.
reg = New RegularExpressions.Regex("[^a-zA-Z0-9 ]")
Dim textoSinAcentos As String = reg.Replace(textoNormalizado, "")
Debug.WriteLine(textoSinAcentos)
'muestra 'Manana sera otro dia'
El problema es que no doy con una que pueda utilizar con FrameWoek 1.*, solo consigo esto:
Dim ConSignos As String ="áà äéèëÃ*ìïóòöúùüÃÀÄÉÈËÃÃŒÃÓÒÖÚÙÜçÇ"
Dim SinSignos As String ="aaaeeeiiiooouuuAAAEEEIIIOOOUUUçÇ"
Dim v as integer
Dim texto as string
for(v=0;v<SinSignos.Length;v++) {
Dim i As string=ConSignos.Substring(v,1)
Dim j As string=SinSignos.Substring(v,1)
texto=texto.replace(i,j)
}
Sabe alguien de otra funcion??
Pero si alguien la la tiene cuens que nos la mande!! ![]() Saludos |
| ||||
| Respuesta: .NET Basic - Funcón quitar Acentos Entonces mientras espera tomando un café a que te hagamos tu tarea. Investiga lo que te dice Peter y deja de estar esperando a que te lo den todo.
__________________ Mejoremos nuestro país, ayudemos al planeta... próximamente. |