Collapsed

逻辑型，设为True，折叠页面，设为False，展开页面。

示例

展开名为"项目"的页面：

Dim tp As WinForm.TopicPage
tp = Forms("窗口1").Controls("TopicBar1").Pages("项目")
tp.Collapsed = False