expression.WindowState As FormWindowState
where expression is a variable that represents a Frame Object
expression.WindowState As FormWindowState
Sub Sample_Frame_WindowState() Dim ret As Integer ret = MsgBox("Maximize the Reflection Desktop window?", vbYesNo) If ret = vbYes Then ThisFrame.WindowState = FormWindowState_Maximized Else ThisFrame.WindowState = FormWindowState_Normal End If End Sub