
12/09/2010, 16:59
|
| | Fecha de Ingreso: marzo-2007
Mensajes: 74
Antigüedad: 17 años, 11 meses Puntos: 0 | |
Respuesta: Mensaje Exeption VB.Net Unicamente voltea la diagonal y listo, a mi me funciono
saludos.
Imports System
Module Module1
Sub Main()
Dim numerador As Integer
Dim denominador As Integer
Dim Resultado As Double
Try
Console.WriteLine("Introduzca el numerador:")
numerador = Console.ReadLine()
Console.WriteLine("Introduzca el denominador")
denominador = Console.ReadLine()
Resultado = numerador \ denominador
Console.WriteLine("El resultado es:" & Resultado)
Catch exception As Exception When denominador = 0
Console.WriteLine("No se puede dividir por cero.")
End Try
End Sub
End Module |