'Line 11, BC30459: 'Nothing' is not valid in this context. Imports System Module ConditionalCompilation Sub Main() Dim value As Integer Dim a,b As Integer Try 'Testing #If and #End If Block #If a+b value=10 #End If If value<>10 Then Throw New Exception("#A1-Conditional Compilation:Failed ") End If Catch e As Exception Console.WriteLine(e.Message) End Try End Sub End Module