SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: palmiro en Miércoles 9 de Abril de 2003, 23:49

Título: Re: Agregar texto de textbox a un maskedit
Publicado por: palmiro en Miércoles 9 de Abril de 2003, 23:49
Hola, quisiera pedir su ayuda para saber como puedo hacer que un texto como 123456789 que se encuentra ingresado en un textbox pase a un maskedit que tiene la mascara ##.###.###-#, para que se vea en el maskedit algo como 12.345.678-9. Intente hacer algo con el comando format con algo parecido a lo de abajo :

a = text1.text
s = Format(a, "00" & "." & "000" & "." & "000" & "-" & "0")

y tambien

a = text1.text
s = Format(a, "00.000.000" & "-" & "0")

pero necesito dejar el texto con forma diferente en el maskedit no en otra cosa.

Gracias al que me pueda ayudar
Título: Re: Agregar texto de textbox a un maskedit
Publicado por: FER_LUCAS33 en Jueves 10 de Abril de 2003, 00:39
Hola:

Prueba Con Algo Como Esto:

S = mid(text1.text, 1, 2) & "." & mid(text1.text, 3, 3) & "." & mid(text1.text, 6, 3) & "-" & mid(text1.text, 9, 1)


Espero Que Te Sirva de Algo

Saludos
:comp:
Título: Re: Agregar texto de textbox a un maskedit
Publicado por: palmiro en Jueves 10 de Abril de 2003, 05:47
Gracias por tu respuesta, funciono todo OK

:jumpie:
Título: Re: Agregar texto de textbox a un maskedit
Publicado por: J.M.Movilla en Jueves 10 de Abril de 2003, 11:25
Me alegra el que se te haya solucionado el problema; pero considero que ñesa es una solución poco estable. Porque ¿qué te resultaría si la cifra, en lugar de tener 9 de longitud, tuviera 8? ¿Qué te daría si introdujeses 12345678?. Yo supongo que tú quisieras obtener 1.234.567-8, y sim embargo te aparecería 12.345.678- y ERROR.
La solución creo que es Format( a, "##.###.##0-0") si bien yo nunca he usado el guión dentro de una máscara...

Saludos y suerte
Título: Agregar texto de textbox a un maskedit
Publicado por: elisa en Miércoles 22 de Octubre de 2003, 21:34
Citar
Originalmente publicado por J.M.Movilla
Me alegra el que se te haya solucionado el problema; pero considero que ñesa es una solución poco estable. Porque ¿qué te resultaría si la cifra, en lugar de tener 9 de longitud, tuviera 8? ¿Qué te daría si introdujeses 12345678?. Yo supongo que tú quisieras obtener 1.234.567-8, y sim embargo te aparecería 12.345.678- y ERROR.
La solución creo que es Format( a, "##.###.##0-0") si bien yo nunca he usado el guión dentro de una máscara...

Saludos y suerte