Copy Code Public Property RefNo() As Nullable(Of Integer) Get If IsNothing(Session("RefNo")) Then Return Nothing Else Return CInt(Session("RefNo")) End If End Get Set(ByVal value As Nullable(Of Integer)) Session("RefNo") = value End Set End Property
Copy Code Dim ValidRefNo as Integer If RefNo.HasValue Then ValidRefNo = RefNo.Value Else ValidRefNo = 0 End If
Copy Code Dim i As Nullable(Of Integer) Dim b As Boolean i = Nothing b = i.HasValue 'Will be False i = 123 b = i.HasValue 'Will be True Dim j As Integer = i.Value 'j = 123