Community
Dim oPsDbDic As DBDictionary = CType(oTrans.GetObject(oPSoId, OpenMode.ForWrite, False, False), DBDictionary)
For Each oDE As DictionaryEntry In oPsDbDic
If oDE.Key.ToString.Equals("[WHAT YOU'RE LOOKING FOR]") Then
bPlotSetExists = True
Exit For
End If
Next