默认就是固定的,是添加的标题破坏了原weui'框架的布局
改为
Dim wb As new WeUI
Dim txt As String = "由各种物质组成的巨型球状天体,叫做星球.星球有一定的形状,有自己的运行轨道."
'增加三个页面,一个按钮
With wb.AddTabBar("", "tb1", 0)
.AddPage("page1","主页","./images/zhuye.png")
.AddPage("page2","测试","./images/msg.png")
.AddPage("page3","我的","./images/article.png")
End With
wb.InsertHTML("page1","<div style='width:100%;text-align:center;color:#04be02'><img style='width:25%;height:auto;' src='.\logo.png'> <h3>逸飞书画云ERP管理系统</h3></div>")
wb.InsertHTML("page2","<div style='width:100%;text-align:center;color:#04be02'><img style='width:25%;height:auto;' src='.\logo.png'> <h3>逸飞书画云ERP管理系统</h3></div>")
wb.InsertHTML("page3","<div style='width:100%;text-align:center;color:#04be02'><img style='width:25%;height:auto;' src='.\logo.png'> <h3>逸飞书画云ERP管理系统</h3></div>")
'为第一个页面增加内容
With wb.AddGrid("page1","g1")
.Add("c1","学员管理", "./images/user_add.png","/xylist.htm")