专业报表设置了下边线为白色，就弄成了下面的效果，有办法解决断线的问题吗？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

rt.Cells(i,0).Text= "合计"

rt.Cells(i,1).SpanCols = 8

rt.Cells(i,1).Text =" 数量:" & sl &" 金额:" & Format(je,"0.00")

i=i+1

rt.Cells(i,0).SpanCols = 9

rt.Cells(i,0).Text ="本单应收:" & Format(je,"0.00") & " 本单实收:"& args(4) & " 本单欠款:" & je-args(4)

i=i+1

rt.Cells(i,0).SpanCols = 9

rt.Cells(i,0).Text ="客户签名:________________ 收款人签名:________________ "

rt.Rows(i).Style.GridLines.left=New Prt.LineDef(0.5, Color.white)

rt.Rows(i).Style.GridLines.right=New Prt.LineDef(0.5, Color.white)

rt.Rows(i).Style.GridLines.bottom=New Prt.LineDef(0.5, Color.white)

rt.Rows(i-1).Style.GridLines.Horz = new Prt.LineDef(Color.black)

rt.Rows(i-1).Style.GridLines.Vert = new Prt.LineDef(Color.black)

i=i+1

rt.Cells(i,0).SpanCols = 9

rt.Cells(i,0).Text ="全国服务热线:400-811-8733 网址:www.failon.com 安装服务电话:18116788811"

rt.Rows(i).Style.GridLines.left=New Prt.LineDef(0.5, Color.white)

rt.Rows(i).Style.GridLines.right=New Prt.LineDef(0.5, Color.white)

'rt.Rows(i).Style.GridLines.bottom=New Prt.LineDef(0.5, Color.white)

i=i+1

rt.Cells(i,0).SpanCols = 9

rt.Cells(i,0).Text ="顾客须知:"

rt.Rows(i).Style.GridLines.bottom=New Prt.LineDef(0.5, Color.white)

rt.Rows(i).Style.TextAlignVert = prt.AlignHorzEnum.left

i=i+1

rt.Cells(i,0).SpanCols = 9

rt.Cells(i,0).Text ="1.所有售出的商品享受国家三包规定和法狮龙的售后服务"

rt.Rows(i).Style.GridLines.bottom=New Prt.LineDef(0.5, Color.white)

rt.Rows(i).Style.TextAlignVert = prt.AlignHorzEnum.left '内容垂直居中

i=i+1

rt.Cells(i,0).SpanCols = 9

rt.Cells(i,0).Text ="2.订单客户交60%定金我,安装完交齐全款:"

rt.Rows(i).Style.GridLines.bottom=New Prt.LineDef(0.5, Color.white)

rt.Rows(i).Style.TextAlignVert = prt.AlignHorzEnum.left '内容垂直居中

i=i+1

rt.Cells(i,0).SpanCols = 9

rt.Cells(i,0).Text ="3.需要安装的客户提前1周通知各专卖店,以便于安排安装时间:"

rt.Rows(i).Style.GridLines.bottom=New Prt.LineDef(0.5, Color.white)

rt.Rows(i).Style.TextAlignVert = prt.AlignHorzEnum.left '内容垂直居中

i=i+1

rt.Cells(i,0).SpanCols = 9

rt.Cells(i,0).Text ="4.客户由于自身原因要求退单,我公司将扣除丰关费用(运输费?退货费以及20%手续费),"

rt.Rows(i).Style.GridLines.bottom=New Prt.LineDef(0.5, Color.white)

rt.Rows(i).Style.TextAlignVert = prt.AlignHorzEnum.left '内容垂直居中

i=i+1

rt.Cells(i,0).SpanCols = 9

rt.Cells(i,0).Text ="右为特定造型,订金恕不退还:"

rt.Rows(i).Style.GridLines.bottom=New Prt.LineDef(0.5, Color.white)

rt.Rows(i).Style.TextAlignVert = prt.AlignHorzEnum.left '内容垂直居中

i=i+1

rt.Cells(i,0).SpanCols = 9

rt.Cells(i,0).Text ="5.货到现场,必须履行验货手续并将付清余款,在""客户现场验货签字"""

rt.Cells(i,0).Style.TextAlignVert = prt.AlignHorzEnum.left '内容垂直居中

doc.Body.Children.Add(rt) '将表格对象加入到报表中

Doc.Preview() '预览报表

主题：专业报表设置了下边线为白色，就弄成了下面的效果，有办法解决断线的问题吗？