[浏览完整版]
标题：div背景色问题
1楼
ycs5801 发表于：2024/5/15 10:59:00
此主题相关图片如下：微信截图_20240401092854.png
下边这两个绿色块，怎样可以像上边红色块那样横向填满？
代码如下：
With ExWeUI.WebUI.AddListGroup("page1", "lst01", 1)
Dim color1 As String = "style='background-color:#f69797;width:100%'" '暗红色，已超期
Dim color2 As String = "style='background-color:#d9a738;width:100%'" '淡黄色，正在进行
Dim color3 As String = "style='background-color:#198d65;width:100%'" '淡绿色，已完成
Dim color As String
For Each dr As DataRow In drs
If dr("是否完成") = True Then '已完成
color = color3
ElseIf dr("是否完成") <> True And dr("完成时限") >= Date.Today() Then '正在进行
color = color2
ElseIf dr("是否完成") <> True And dr("完成时限") < Date.Today() Then '已超期
color = color1
End If
Dim txt As String = "<p " & color & ">发布日期:" & dr("发布日期") & "<br/>"
txt = txt & "发布人:" & dr("用户姓名") & "<br/>"
txt = txt & "完成时限:" & dr("完成时限") & "<br/>"
txt = txt & "责任人:" & dr("责任人") & "</p>"
Dim s As String = dr("信息内容")
If s.length > 10 Then
txt = txt & "<p>具体内容:" & s.substring(0, 10) & "......" & "</p>"
Else
txt = txt & "<p>具体内容:" & dr("信息内容") & "</p>"
End If
....
2楼
有点蓝 发表于：2024/5/15 11:05:00这种自己使用开发者工具，调试查看是什么样式影响的，在开发者工具里调整找到合适的设置
3楼
ycs5801 发表于：2024/5/15 11:21:00此主题相关图片如下：微信截图_20240401092854.png
调试是这样，应该怎么改呢？
4楼
有点蓝 发表于：2024/5/15 11:27:005楼
ycs5801 发表于：2024/5/15 14:47:00此主题相关图片如下：微信截图_20240401092854.png
With .AddList("主题:" & dr("信息主题"),"", "renamecx_name.htm?name=" & dr("_Identify"))
.TextStyle = "color:red;font-size:15px" '字体颜色,字体大小
.ImageWidth = 2 '图片大小
With .LeftFooter
.AddFoot(txt).Attribute = "style='background-color:#198d65;font-size:17px'"
End With
End With
我直接在改这个addfoot里边的属性，为什么没有背景色呢？
6楼
有点蓝 发表于：2024/5/15 15:06:00请上传实例测试
7楼
ycs5801 发表于：2024/5/15 15:11:00| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:renamecxtq.rar |
8楼
有点蓝 发表于：2024/5/15 15:38:00请做个可以测试的项目实例发上来。或者提供外网可以打开的网页的测试地址看看
9楼
ycs5801 发表于：2024/5/15 15:55:00以下内容是专门发给有点蓝浏览
已上传
10楼
有点蓝 发表于：2024/5/15 16:15:00连接不到数据库，另外怎么测试，哪个页面？哪个函数