WeUI中的List问题,可扩展性小,问题见红字体!
例子:
Select Case e.Path
Case "","logon.htm"
Dim wb As New WeUI
With wb.AddListGroup("", "lsg2", "增加图标的列表") '如何设置标题"增加图标的列表"的样式??
' .Attribute = "style='color:blue;"
With .Add("ls3","新浪主页", "163.com","http://www.foxtable.com/","/images/bit06.gif") '如何设置这个图标的大小(与字体大小相适应)?
.Attribute = "style='color:blue;font-size:10px;" '加上这个样式,跳转连接就失效!!!
End With
With .Add("ls4","网易主页", "sina.com","http://www.foxtable.com/","/images/bit06.gif")
' .Attribute = "style='color:blue;font-size:10px;"
End With
End With
e.WriteString(wb.Build)
End Select