以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  照片水平居中  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=170734)
--  作者：sunion0769
--  发布时间：2021/8/5 14:05:00
--  照片水平居中
各位老师，我有个问题，  .AddImage("./images/001.jpg")代码中图片位置如何设置水平方向居中？照片是默认靠左对齐的

Select Case e.Path
    Case "test.htm"
        Dim wb As New WeUI
        With wb.AddArticle("","ar1")
            .AddTitle("h1","大标题")
            .AddTitle("h2","章标题")
            .AddTitle("h3","1.1节标题")
            .AddContent("Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo consequat. Duis aute")
            .AddImage("./images/001.jpg")

        End With
        e.WriteString(wb.Build) \'生成网页
End Select
[此贴子已经被作者于2021/8/5 14:18:50编辑过]
--  作者：有点蓝
--  发布时间：2021/8/5 14:24:00
--  
换种方式添加图片

Select Case e.Path
    Case "test.htm"
        Dim wb As New WeUI
        With wb.AddArticle("","ar1")
            .AddTitle("h1","大标题")
            .AddTitle("h2","章标题")
            .AddTitle("h3","1.1节标题")
            .AddContent("<div style=\'width:100%;text-align:center;\'><img src=\'./images/001.jpg\'></div>")
        End With
        e.WriteString(wb.Build) \'生成网页
End Select