Programación General > Visual Basic 6.0 e inferiores
Validar Text Box Con Propiedad Multiline
Brroz:
¿Y los espacios intermedios?
Cyclop:
Hacer esto tantas veces como sea posible
--- Código: Text --- ' Reemplazamos dos espacios en blanco con unoDo While InStr(1,sString, " ") > 0 sString = Replace(sString, " ", " ")Loop
Salu2
Brroz:
Ya, pues que sepas que te sobra el bucle y repites algo ya dicho:
--- Citar ---También podrías optar por validar el texto mediante el evento en un lostfocus o en un validate (mejor). Te llegaría con una línea así:
--- Código: Text --- Text1.Text = LTrim(Replace(Text1.Text, Chr(32) & Chr(32), Chr(32))
--- Fin de la cita ---
De todas formas con esto obligas al desaparecido Cmps360 a programar una validación. El mismo...
Abur.
Cyclop:
Logicamente que es una alternativa mas ... que no pretende ser un estilo ni un estandar de validacion.
Salu2
Cyclopz
Cyclop:
--- Cita de: "Brroz" --- Ya, pues que sepas que te sobra el bucle y repites algo ya dicho:
--- Citar ---También podrías optar por validar el texto mediante el evento en un lostfocus o en un validate (mejor). Te llegaría con una línea así:
--- Código: Text --- Text1.Text = LTrim(Replace(Text1.Text, Chr(32) & Chr(32), Chr(32))
--- Fin de la cita ---
De todas formas con esto obligas al desaparecido Cmps360 a programar una validación. El mismo...
Abur.
--- Fin de la cita ---
Si pero esto funciona solo si tiene 2 espacios en blanco (Chr(32) + Chr(32)), y si tiene 3? 4? o mas?
Salu2
Navegación
[#] Página Siguiente
[*] Página Anterior
Ir a la versión completa