在程序中做出信息的分隔线

在程序中做信息的分割线
当我们要对一些消息进行分类时，最常用的控件是Frame；但是，我们也可以使用
双线控件来划分消息的类别。效果有点类似于网上常见的
横线，或者/description/about中的分割线.../
的微软产品。例如，下面的代码可以
产生如下图所示的效果:
请先在表单中添加两个Line控件
private subform _ Load()
with Line 1
。border color = & h 808080
. x1 = 0
. x2 = 5000
. y1 = 1100
. y2 = . y1
以第2行的
结尾。BorderColor = vbWhite
。BorderWidth = 2
.X1 = Line1。X1
.X2 = Line1。X2
.Y1 = Line1。Y1 + 20
.Y2 = .Y1
以
Line1结尾。ZOrder 0
End Sub