With ExWeUI.WebUI.AddTabsGroup("", "tg02") \'约课页面
.Attribute = "style = \'line-height: 45px;background-color:#e5f2ff;color:#000066\'" \'自定义设置标签背景色/高度等
.ActiveColor = "black" \'设置当前标签颜色
With .AddPage("tab011", "团课")
.Content = tab1.BuildHtml
End With
With .AddPage("tab021", "精品课")
.Content = tab2.BuildHtml
End With
With .AddPage("tab031", "私教课")
.Content = tab3.BuildHtml
End With
wb.InsertHTML("yueke",.BuildHtml) \'插入到约课页面
End With