expression.WindowMode As WindowModes
where expression is a variable that represents a Frame Object
expression.WindowMode As WindowModes
Sub Sample_Frame_WindowMode() 'If in Browser or Ribbon mode, multiple documents are supported If ThisFrame.WindowMode = WindowModes_Browser Or _ ThisFrame.WindowMode = WindowModes_Ribbon Then MsgBox ("There are " & Str(ThisFrame.ViewCount) & " views open within this frame instance.") Else 'WindowModes_Classic MsgBox ("Since this frame is in ""classic"" mode, there cannot be more " & _ "than one session view open in it.") End If End Sub