I had to rearrange my code a bit but i have figured it out my self here it is
Module Module1
Sub Main()
Dim Input As String
Console.WriteLine("If Cube Input 1")
Input = Console.ReadLine()
If Input = ("1") Then
Try
Dim Side As String
Console.WriteLine("Input the value of the side")
Side = Console.ReadLine()
Dim C As Integer
C = Side * Side * Side
Console.WriteLine(C)
Catch ex As Exception
Finally
Console.ReadKey()
End Try
End If
End Sub
End Module
I had an assignment that required me to use exceptionin this way