***Ayuda para Recortar Caracteres***

02/12/2004 - 19:15 por madrigal | Informe spam
Qué tal. Tengo un pequeño problema. Estoy migrando aplicaaciones de VB6.0 a
VB.NET. Ahora estoy algo confundido, ya que en VB6 tengo una función que lee
datos de un ".ini" pero al pasarla a VB.NET no me funciona adecuadamente al
recortar los caracteres excedentes (espacios) en una cadena. He aquí en
código:
Function ReadINI(ByRef AppName As String, ByRef KeyName As String, ByRef
FileName As String) As String
Dim sRet As String
sRet = New String(Chr(" "), 255)
ReadINI = Left(sRet, GetPrivateProfilestring(AppName, KeyName, "",
sRet, Len(sRet), FileName))

ReadINI = LTrim(RTrim$(sRet))

End Function

En la línea "ReadINI = LTrim(RTrim$(sRet))" la longitud de la variable que
contiene el dato leído del archivo ini es de 255, y la longitud del dato es
en realidad mucho menor, o sea que no me está recortando los caracteres con
la instrucción trim. ¿Qué estoy haciendo mal?. En VB6 funciona bien. ¿Me
podrían ayudar?
Gracias.
 

Preguntas similares