set bzhao = CreateObject("BZWhll.WhllObj") bzhao.Connect set wnd = bzhao.Window() wnd.Visible = False ' hide the session window wnd.State = 2 ' maximize the window wnd.Visible = True ' show the session window