用代码处理一下
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
For Each c As object In Doc.Body.Children If c.Gettype.name Like "*RenderText*" AndAlso c.Text = e.Form.Controls("TextBox1").Text Then c.Text = "我定义的新的字符串"
Exit For End IfNext
doc.Preview
加好友 
发短信
Post By：2015/6/10 9:14:00 [显示全部帖子]
