Imports System

Public Module Module1

    Public Sub Main()

        Dim o as SomeObject = Nothing

        Dim value = If(o?.SomeProperty, 0)

        Console.WriteLine(value)

    End Sub

End Module

​

Public Class SomeObject

    Public Property SomeProperty As Integer

End Class