Foxtable(狐表)用户栏目专家坐堂 → 专业报表 怎么实现在某某县某某系统某某局第二个出现的地方 加一段…………………………………………呢?便于拆切


  共有2375人关注过本帖树形打印复制链接

主题:专业报表 怎么实现在某某县某某系统某某局第二个出现的地方 加一段…………………………………………呢?便于拆切

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107813 积分:548416 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/6/8 9:36:00 [显示全部帖子]

        
        rt.Cols(0).Width=18
        rt.Cells(2,0).RenderObject = rm1 '将单元格内容设置为图片对象rm
        
        
        ra.Children.Add(rt) '加入到容器中
        If i1= 1
            Dim rt2 As New prt.RenderText '定义一个文本对象
            rt2.Text = "........................................................" '设置文本对象的内容
            ra.Children.Add(rt2)
        End If
        Doc.Body.ChildRen.Add(ra) '将容器加入到报表中
        
    Next
Next
Doc.Preview() '预览报表

 回到顶部