Programación General > Visual Basic 6.0 e inferiores

 Re: Agregar texto de textbox a un maskedit

(1/1)

palmiro:
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

FER_LUCAS33:
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:

palmiro:
Gracias por tu respuesta, funciono todo OK

:jumpie:

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

elisa:

--- 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
--- Fin de la cita ---

Navegación

[0] Índice de Mensajes

Ir a la versión completa