Foxtable(狐表)用户栏目专家坐堂 → AddSideTab生成第二个页面显示小是什么原因


  共有2097人关注过本帖树形打印复制链接

主题:AddSideTab生成第二个页面显示小是什么原因

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107730 积分:547983 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/4/20 9:02:00 [显示全部帖子]

我这样测试没有问题

Dim wb As New weui
wb.AppendHTML("<link rel='stylesheet' href='./weui/exweui.css'/>", True) 
wb.AppendHTML("<script src='./weui/exweui.js' ></script>", True)

With wb.AddTabBar("", "tb1", 0)
    .AddPage("page1", "历史未完", "./images/UI1.png").Attribute = "style='height: 100%;'" 
    .AddPage("page2", "今日计划", "./images/UI2.png").Attribute = "style='height: 100%;'"  
End With

Dim tab As ExWeUI.ExSideTab = ExWeUI.WebUI.AddSideTab("page1", "stab1")
tab.AddPage(("生产"), ("生产"), "") 
wb.InsertHTML("page1", tab.BuildHtml)

tab = ExWeUI.WebUI.AddSideTab("page2", "stab2")
tab.AddPage(("机台2"), ("机台2"),"") 
wb.InsertHTML("page2", tab.BuildHtml)
wb.AppendHTML("<script>initExWeUI();</script>")
e.WriteString(wb.Build)

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107730 积分:547983 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/4/20 11:41:00 [显示全部帖子]


 回到顶部