以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  文本框的内容打印  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=82744)

--  作者:qinlao666
--  发布时间:2016/3/24 9:20:00
--  文本框的内容打印
老师文本框的内容打印出来是没有边框的,如何能实现打印出边框呢!
--  作者:大红袍
--  发布时间:2016/3/24 9:23:00
--  
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
For Each c As Object In doc.body.children
    If typeof c Is prt.RenderText Then
        c.Style.Borders.All = New prt.Linedef(0.5, Color.black)
    End If
Next
doc.Preview()