以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如果要改变文字(黄色阴影部分)的大小属性,可以用什么办法?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170653)

--  作者:sunion
--  发布时间:2021/8/3 15:12:00
--  如果要改变文字(黄色阴影部分)的大小属性,可以用什么办法?

Select Case e.Path
    Case "test.htm"
        Dim wb As New WeUI

        With wb.AddListGroup("", "lsg4",
"
增加图标的列表")
            .Add("ls7",
"
新浪主页", "sina.com", "http://www.sina.com.cn", "./images/sina.png")
           
.Add("ls8","网易主页", "163.com", "http://www.163.com", "./images/163.png").Badge="新"
        End With
        e.WriteString(wb.Build)

End
Select



问题:如果要改变文字(黄色阴影部分)的大小属性,可以用什么办法?


--  作者:有点蓝
--  发布时间:2021/8/3 15:25:00
--  
.Add("ls7","<span style=\'font-size:40px\'>新浪主页</span>", "sina.com", "http://www.sina.com.cn", "./images/sina.png")
--  作者:sunion
--  发布时间:2021/8/3 16:01:00
--  
好的,谢谢
那再请教一下,后面图片./images/sina.png的大小控制怎么处理呢?


--  作者:有点蓝
--  发布时间:2021/8/3 16:34:00
--  
Select Case e.Path
    Case "test.htm"
        Dim wb As New WeUI
        With wb.AddListGroup("", "lsg4","增加图标的列表")
            .Add("ls7","<span style=\'font-size:40px\'>新浪主页</span>", "sina.com", "http://www.sina.com.cn", "./images/sina.png")
            .Add("ls8","网易主页", "163.com", "http://www.163.com", "./images/163.png").Badge="新"
        End With
        wb.AppendHTML("<style>#ls7 img {width:50px !important}</style>",True)
        e.WriteString(wb.Build)
End Select