13/02/2006, 12:50
|
 | Colaborador | | Fecha de Ingreso: diciembre-2003 Ubicación: Antigua Guatemala
Mensajes: 4.032
Antigüedad: 21 años, 4 meses Puntos: 53 | |
| lo vas a tener que hacer a pie.. con esto me refiero que vas a tener que hacer un case dentro de una función
function meses(mesInt as integer) as string
select case mesI
case 1
meses = "Enero"
case 2
meses = "Febrero"
end select
end function
y en el evento lost_focus del texto pones esto.
TxtMeses.Text = meses(TxtMeses.Text)
__________________ * Antes de preguntar lee las FAQ, y por favor no hagas preguntas en las FAQ
Sitio http://www.geoavila.com twitter: @GeoAvila |