Como uso o Try, Catch e Finalmente
Minha tarefa é escrever um programa que solicite ao usuário 10 números dos quais ele encontrará a média e deve incluir as palavras-chave Try, Catch e Finalmente. (Divida por zero exceção).
Como usar o Try, Catch e Finalmente?
Até agora, meu programa se parece com isso:
Module Module1
Public Sub Main()
Dim A, B, C, D, E, F, G, H, I, J, K, L, M As Integer
Console.WriteLine("Enter 1st Number: ")
A = Console.ReadLine()
Console.WriteLine("Enter 2nd Number: ")
B = Console.ReadLine()
Console.WriteLine("Enter 3rd Number: ")
C = Console.ReadLine()
Console.WriteLine("Enter 4th Number: ")
D = Console.ReadLine()
Console.WriteLine("Enter 5th Number: ")
E = Console.ReadLine()
Console.WriteLine("Enter 6th Number: ")
F = Console.ReadLine()
Console.WriteLine("Enter 7th Number: ")
G = Console.ReadLine()
Console.WriteLine("Enter 8th Number: ")
H = Console.ReadLine()
Console.WriteLine("Enter 9th Number: ")
I = Console.ReadLine()
Console.WriteLine("Enter 10th Number: ")
J = Console.ReadLine()
K = (A+B+C+D+E+F+G+H+I+J)
Console.WriteLine("Enter the amount of numbers to average: ")
M = Console.ReadLine()
L = K / M
Console.WriteLine("The Average Is: " & L)
Console.ReadKey()
End Sub
End Module