以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 勾选的行改变样式 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140972) |
-- 作者:minghui0712 -- 发布时间:2019/9/18 14:22:00 -- 勾选的行改变样式 老师,怎么让表被勾选到的所有行改变样式,样式我会涉及,被勾选后的行的集合有,我通过按钮将勾选的行生成报表,然后用颜色标记,应该怎么实现 Dim rs As List(of Row) = Tables("银保承保清单").GetCheckedRows If rs.Count > 0 Then \'如果存在符合条件的行 Dim tm As String = ProjectPath & "Attachments\\贺报.doc" \'指定模板文件 Dim fl As String = ProjectPath & "Reports\\贺报.doc" \'指定目标文件 Dim wrt As New WordReport(Tables("银保承保清单"),tm,fl) \'定义一个WordReport For Each r As Row In rs \'逐行生成报表 r.Sytle = "已选行" wrt.BuildOne(r) Next wrt.Show() \'显示报表 End If 这个代码有问题,Sytle不是行的属性么?
|
-- 作者:有点蓝 -- 发布时间:2019/9/18 14:38:00 -- word报表不支持样式设置 |