以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  勾选的行改变样式  (http://foxtable.net/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报表不支持样式设置