主题：[求助]ADDFOOT居中

参考代码

Select Case e.Path
    Case "test.htm", ""
        Dim wb As New WeUI
        wb.AddPageTitle("","bp1","","")
        With wb.AddPanelGroup("","pg1","")
            With .Add("pn2","","","")
                .AddFoot("<div align='center'><a href='" & "www.baidu.com" & "'>打开百度</a></div>")
            End With
        End With
        wb.InsertHTML("<style>.weui_media_box.weui_media_text .weui_media_info_meta{float: none;}</style>")
        e.WriteString(wb.Build) '生成网页
End Select