获取并列窗口的tab对象
Dim tab = Forms("窗口1").panel.parent.parent
然后,参考 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=88097&skin=0