以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  这个打印不执行，有错误  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89310)
--  作者：天蝉一线
--  发布时间：2016/8/18 22:19:00
--  这个打印不执行，有错误
Dim ysb As WinForm.TreeView = e.Form.Controls("TreeView2")
Dim doc As PrintDoc = e.Form.GernatePrintDoc(ysb)
doc.Preview

请问：treeview生成的目录树怎么才能打印出来
--  作者：大红袍
--  发布时间：2016/8/18 22:56:00
--  

 参考

 

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim doc As New PrintDoc \'定义一个报表
For Each nd As WinForm.TreeNode In trv.AllNodes
    Dim rt As New prt.RenderText \'定义一个文本对象
    rt.Text = "".PadLeft(nd.Level * 8) & nd.Text
    doc.Body.Children.Add(rt) \'将文本对象加入到报表
Next
doc.Preview() \'预览
--  作者：天蝉一线
--  发布时间：2016/8/19 12:02:00
--  
能不能每页再加上主标题和副标题，副标题为treeview(不是treeview1)里面的e.nodes.level =0的值
--  作者：Hyphen
--  发布时间：2016/8/19 14:19:00
--  
看懂专业报表的用法
--  作者：大红袍
--  发布时间：2016/8/19 14:23:00
--  

 页眉页脚？

 

http://www.foxtable.com/webhelp/scr/1197.htm