or
Public
Class
ReportTestFiltered
Inherits
ReportTestDataContext
Public
Sub
New
()
MyBase
.
New
()
End
Sub
Public
Shadows
ReadOnly
Property
Users()
As
IQueryable(Of User)
Get
Return
MyBase
.Users.Where(
Function
(x) x.Active).AsQueryable()
End
Get
End
Property
End
Class