Mascaras para textbox

Alex
26 de Abril del 2004
Necesito colocar mascaras a mis controles text pero no con mask edit ya esta creado el form con text como le doy una mascara a un text...
urgente

mapacha
26 de Abril del 2004
hola alex.
lo que pasa es que yo pienso que por fuerza necesitas
el maskedbox, si no esta en elcuadro de herramientas,
ve al menu proyecto y lugo da clic en componentes
y el el cuadro qu ete aparece busacaMicrosoft Masked Edit Control 6.0
lugo da clic en el cuadrito para que aparezca una paolimita.
y ya te a parece en el cuadro de herramientas.
espero que te sirva de ayuda esto.
saludos desde mexico

krizall
26 de Abril del 2004
hola alex pues no necesariamente tiene que ser ese control, lo que puedes hacer es un procedimiento que te ponga o quite el formato ya sea de fecha, moneda o porcentaje de un text, cuando tu lo decidas solo llamandola y dandole como parametro si quieres el cuadro de texto o la cadena y por ejemplo para porcentaje
private function formato(byval cadena as string,byval aplicar as boolean) as string
if aplicar=true then
if right(cadena,len(cadena)-2,2)=" %" then
exit function
else
formato=cadena & " %"
end if
elseif aplicar=false then
if right(cadena,len(cadena)-2,2)=" %" then
exit function
else
formato=left(cadena,len(cadena)-2)
end if
end if
end function

ahora por ejemplo en el evento gotfocus de un text
formato text1.text,false 'quita el formato

en el evento lostfocus
formato text1.text,true 'pone el formato

podrias hacer algo asi para los formatos de fecha y moneda espero te sirva de algo, por cierto creo que el text tiene mascara o algo asi no recuerdo..??
pero espero que esto te sirva de algo