参考代码
Dim tab = forms("窗口1").panel.parent.parenttab.font = new font("宋体", 20)tab.tabpages(1).font = new font("宋体", 9)