Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine(DirectCast(Nothing, Integer))

        Console.WriteLine(DirectCast(GetNothingInteger(), Integer))

        Console.WriteLine(DirectCast(GetZeroObject(), Integer))

        Console.WriteLine(DirectCast(GetNothingObject(), Integer))

    End Sub

    Public Function GetNothingObject() As Object

        Return Nothing

    End Function

    Public Function GetZeroObject() As Object

        Return 0

    End Function

    Public Function GetNothingInteger() As Integer

        Return Nothing

    End Function

    ' This is a comment

End Module