绘制线条

定义一个线条的语法是：

New prt.RenderLine(X1, Y1, X2, Y2, LineDef)

X1、Y1：  整数型，线条起始坐标位置
X2、Y2：  整数型，线条结束坐标位置
LineDef:  线条样式

示例

Dim doc As New PrintDoc '定义一个报表
Dim Line As New prt.LineDef(2, Color.Red)
Dim ln As New prt.RenderLine(20,20, 80, 80, Line)
doc.body.Children.Add(ln) '将线条加入到报表中
Doc.Preview() '预览报表

执行结果

创建一个Linedef的语法是：

New prt.Linedef()
New prt.Linedef(Color)
New prt.Linedef(Width, Color)
New prt.Linedef(Width, Color, DashStyle)

Color:     边框颜色。
Width:     边框宽度，单位为毫米。
DashStyle：DashStyle型枚举，包括以下可选值：

Dash       由线段构成的直线。
DashDot    由线段和点间隔构成的直线。
DashDotDot 由线段和连续两个点间隔构成的直线
Dot        由点构成的直线。
Solid      实线，这是默认值。

示例：