手机端中panel的徽章能否自定义颜色？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

如题，比如我想根据状态生产红绿黄三种颜色

你说的【徽章】指什么地方？

看看 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=124698&skin=0

此主题相关图片如下：1.png

Dim wb As New WeUI
 Dim txt As String = "由各种物质组成的巨型球状天体,叫做星球.星球有一定的形状,有自己的运行轨道."
 With wb.AddPanelGroup("","pg1","图文组合列表")
 .Add("pn1","标题一8",txt,"./images/button.png","http://www.foxtable.com")
 With .Add("pn2","标题二",txt,"./images/search.png")
 .Badge= " "
 .AddFoot("文字来源")
 .AddFoot("时间")
 .AddFoot("|其他信息","http://www.foxtable.com")
 End With
 End With
 e.WriteString(wb.Build) '生成网页

此主题相关图片如下：1.png

此主题相关图片如下：2.png

老师现在能变色但是这个徽章的位置跟原来的有点不一样

If cc="制单" Then

'' .Add("pn" & cc,cc,"操作员:" & pr(cc & "人") & ";" & "时间:" & pr(cc & "日期"),"./images/" & cc & ".png","").Badge = iif(pr.isnull(cc & "人"),"未完成","完成")

.Add("pn" & cc,cc,"操作员:" & pr(cc & "人") & ";" & "时间:" & pr(cc & "日期") & "" & iif(pr.isnull(cc & "人"),"未完成","完成") & "","./images/" & cc & ".png","")

Else

'' .Add("pn" & cc,cc,"操作员:" & pr(cc & "人") & ";" & "时间:" & pr(cc & "时间"),"./images/" & cc & ".png","").Badge = iif(pr.isnull(cc & "人"),"未完成","完成")

.Add("pn" & cc,cc,"操作员:" & pr(cc & "人") & ";" & "时间:" & pr(cc & "时间") & "" & iif(pr.isnull(cc & "人"),"未完成","完成") & "","./images/" & cc & ".png","")

End If

细节请自行调试。在浏览器那里，按下F12，调出调试器，调试你的样式。

我测试4楼代码没问题。

主题：手机端中panel的徽章能否自定义颜色？