- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]插入专业报表的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=40212)
-- 发布时间：2013/9/12 10:03:00
-- [求助]插入专业报表的问题
我的目的是想在顺序控件1所在的页面插入专业报表，执行下面的代码后变成顺序控件1所在的页面及它后面的页面都会插入专业报表，问题出现在哪？
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
Dim ndoc As New PrintDoc \'定义一个报表
Dim idx As Integer = 1
For Each o As object In Doc.Body.Children
ndoc.Body.Children.Add(o.clone)
If idx = 1 Then
Dim rt As New prt.RenderText \'定义一个文本对象
rt.Text = "Hello Foxtable" \'设置文本对象的内容
rt.X = 100
rt.Y = 100
ndoc.Body.Children.Add(rt) \'将文本对象加入到报表
End If
Next
ndoc.Preview()
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目11.1.table |
-- 发布时间：2013/9/12 10:08:00
--
.
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目11.1.table |
-- 发布时间：2013/9/12 21:52:00
--
呵呵，忘记加1了。 idx+=1