This should do it (tested in 2016):
Dim projectBrowser As DB.View = New DB.FilteredElementCollector(doc).OfClass(GetType(DB.View)).Cast(Of DB.View).Where(Function(v) v.ViewType = DB.ViewType.ProjectBrowser).FirstOrDefault
-Matt
This should do it (tested in 2016):
Dim projectBrowser As DB.View = New DB.FilteredElementCollector(doc).OfClass(GetType(DB.View)).Cast(Of DB.View).Where(Function(v) v.ViewType = DB.ViewType.ProjectBrowser).FirstOrDefault
-Matt