Introducción
Las excepciones en visual Basic.NET son objetos de subclases de Excepción. El espacio de nombres System define la clase base SystemException para las excepciones
predefinidas, por ejemplo: aritméticas, de formato, intentar acceder a un
elemento de una matriz con el índice fuera de límites.
Para capturar una excepción Hay
que hacer dos cosas: una, poner a prueba el código que puede lanzar excepciones
dentro de un bloque Try, y dos, manejar
en un bloque Catch la excepción
cuando atrape. Por ejemplo:
Try
‘código que puede
lanzar una excepción
Console.WriteLine(“{0:f} = {2:d}” , a, b, c)
Catch e As exception
‘manejar una
excepxion de la clase Exception
Console.WriteLine(“Error: “ + e.Message)
End Try
En el ejemplo anterior, cuando se lance una excepción del
tipo Excepción porque se produjo un error debido a la ejecución de una
operación de entrada/salida, el objeto e almacenará la información relativa al
error ocurrido, información que puede ser manipulada a través de las
propiedades y métodos de su clase, por ejemplo, message muestra un mensaje
indicando qué error ocurrió.
Por otra parte, al especificar que el tipo de excepciones
que se desea atrapar son de la clase Excepción, cabe cualquier excepción de
cualquier clase derivada de excepción. Si quisiéramos filtrar un tipo
particular de excepciones
Vamos a crear un formulario que dé consultado los intereses
producidos y el capital total acumulado de una cantidad c, invertida a un
interés r durante t días.
Vamos a utilizar una formula I= c*r*t sobre 360*100
Antes de empezar a crear la aplicación, es recomendable
analizar cómo va a estar compuesta la interfaz a continuación detallamos los
elementos:
->4 cajas de texto para introducir la cantidad a
invertir, introducir el porcentaje de interés anual, para visualizar el interés
producido, y finalmente el total capital acumulado.
->4 etiquetas que informen al usuario de la información
que contienen las cajas de texto.
->Un botón de pulsación que permita hacer los cálculos.
En este botón es donde vamos a escribir nuestro código haciendo doble clic en
él.
Nota: al dibujar los controles cambiamos a todas las cajas
de texto su propiedad textName en el
panel de propiedades se cambia el nombre al textbox1.text por Capital por
ejemplo.
Con esta aplicación se quiere que cuando el usuario
introduzca la cantidad a invertir el resto de las cajas se actualicen.
Conocidos los elementos y objetos vamos a proceder al código
de la aplicación.
Escribimos el procedimiento del evento Clic
Private Sub Calcular_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs) _
Handles Calcular.Click
Dim cap As Decimal, tp As Decimal, res As Decimal
Dim formato As String = "{0:#,###, ###,
##0.00}"
try
cap = Convert.ToDecimal(Capital.Text)
tp = Convert.ToDecimal(TpInterés.Text)
Catch exce As FormatException
cap = 0 : tp = 0
End Try
'calculamos los resultados
res = Convert.ToDecimal(cap
* tp / 100)
InterésPro.Text = String.Format(formato, res)
res += cap
CapitalAc.Text = String.Format(formato, res)
End Sub
Recursos
0 comentarios:
Publicar un comentario