Public Property BCMember As BCMember
    Get
        BCMember = Session("BCMember")
    End Get
    Set
        Session("BCMember") = Value
    End Set
End Property

Session("AmountToPay") = 150

Public Property BCMember As BCMember
    Get
        BCMember = Session("BCMember")
    End Get
    Set
        Session("BCMember") = Value
    End Set
End Property

If Session("AmountToPay") = Nothing Then
    Response.Write("AmountToPay is nothing<br />")
End If
Response.Write(BCMember.FirstName & "<br />")
Response.Write(Session("AmountToPay") & "<br />"))