1、使用article：http://www.foxtable.com/mobilehelp/scr/0079.htm
2、改一下样式
Dim wb As New WeUI
wb.AppendHTML("<style>.weui_media_box .weui_media_desc{display: block;}</style>",True)
Dim txt As String = "由各种物质组成的巨型球状天体,叫做星组成的巨型球状天体,叫做星球.."
With wb.AddPanelGroup("","pg1","图文组合列表")
.Add("pn1","标题一",txt,"./images/button.png","http://www.foxtable.com")
With .Add("pn2","标题二",txt,"./images/search.png") '带子链接
.AddFoot("文字来源")
.AddFoot("时间")
.AddFoot("|其他信息","http://www.foxtable.com")
End With
End With
加好友 
发短信
Post By：2018/10/27 10:05:00 [显示全部帖子]
