How do you find out if there is default view?

From Jens Winkelmann:

Dim docDefault As NotesDocument
Set docDefault = db.GetDocumentByID("FFFF0008")
If docDefault is Nothing then
'// default view does not exist
else
'// default view exist
end if

Applies to Notes Versions: 4
4.5
4.6
5
6
6.5
7
8
8.5
9