Cursos subvencionados para trabajadores
Realiza el curso gratis a través de tu empresa.
Cursos SubvencionadosInscríbete ahora y accede a 3 unidades gratis
Evalua el curso de VB II y accede a las 3 unidades gratis con acceso completo al aula virtual donde podrás disfrutar de la inestimable ayuda del tutor y una gran variedad de recursos como videotutoriales, ejercicios resueltos, foros, enlaces, bibliografía, etc....
Crear una clase que indistintamente convierta pesetas en euros y viceversa, además debe convertir a cualquier moneda, introduciendo su nombre y valor de un euro. Es decir, debe contener dos propiedades y un método. Crear una interface para su utilización.
Ayuda: En la clase monedas deberemos tener mucho cuidado al programar los procedimientos Get de las propiedades Eur y Pts, ya que como pretendemos la introducción de cantidades por cualquiera de ellas y que se convierta automáticamente a la otra, deberemos calcular y cargar no sólo el valor de a propiedad, sino también el de la variable privada correspondiente:

El método es más sencillo de programar, ya que como nos pasan el factor de conversión de la moneda elegida por el usuario al euro, y esta cantidad ya la tenemos en la clase, el código se reduce a:

En el formulario que creemos como probador de la clase, haremos una instancia a nuestra clase y programaremos la carga de las propiedades en el evento LostFocus de las cajas de texto correspondientes.
Si por ejemplo estamos en el evento LostFocus de la caja de texto asignada a Pts, deberemos programar la carga de la propiedad Pts, y a continuación asignaremos a la caja de texto asignada a Euros, la propiedad Eur, que ya está calculada.
Nota: Cuando asignemos a una propiedad el contenido de una caja de texto, podemos provocar un error, ya que se espera un tipo de dato numérico y se le está asignando uno de tipo alfanumérico. Para evitarlo, usaremos la función CDbl(), que hace la conversión de texto al tipo de dato Double:
MiMoneda.pts = CDbl(Pesetas.Text)
Inscríbete ahora y accede a 3 unidades gratis
Evalua el curso de VB II y accede a las 3 unidades gratis con acceso completo al aula virtual donde podrás disfrutar de la inestimable ayuda del tutor y una gran variedad de recursos como videotutoriales, ejercicios resueltos, foros, enlaces, bibliografía, etc....
Copyright 2008© ADRInfor S.L. Logroño | Tel: 941250116 Fax: 941236805 | Email | Politica de Privacidad