October 8, 2010

Test Test

        Public Property PollId() As Integer
            Get
                If Not IsNothing(Me.PollReference.EntityKey) Then
                    Return Me.PollReference.EntityKey.EntityKeyValues(0).Value
                End If
                Return 0
            End Get
            Set(ByVal Value As Integer)
                If Not IsNothing(Me.PollReference.EntityKey) Then
                    Me.PollReference = Nothing
                End If
                Me.PollReference.EntityKey = New EntityKey("PollEntities.Polls", "PollID", Value)
            End Set
        End Property
Posted by Brian Stodola at October 8, 2010 3:50 AM