Module LiteralNothing Sub Main() Dim x As Object x = Nothing End Sub End Module