如何：绘制自定义虚线

GDI+ 提供 DashStyle 枚举中列出的多个短划线样式。 如果这些标准短划线样式不符合你的需求，则可以创建自定义短划线模式。

示例

若要绘制自定义虚线，请将短划线和间隔的长度放在一个数组中，并将此数组分配为 Pen 对象的 DashPattern 属性值。 以下示例基于数组 {5, 2, 15, 4} 来绘制一条自定义虚线。 如果将此数组的元素乘以 5 的笔宽度，则将得到 {25, 10, 75, 20}。 显示的短划线在 25 到 75 的长度之间交替，间隔在 10 和 20 的长度之间交替。

下图显示了生成的虚线。 请注意，最后短划线的长度必须小于 25 个单位，使该行可以在 (405, 5) 处结束。

float[] dashValues = { 5, 2, 15, 4 };
Pen blackPen = new Pen(Color.Black, 5);
blackPen.DashPattern = dashValues;
e.Graphics.DrawLine(blackPen, new Point(5, 5), new Point(405, 5));

Dim dashValues As Single() = {5, 2, 15, 4}
Dim blackPen As New Pen(Color.Black, 5)
blackPen.DashPattern = dashValues
e.Graphics.DrawLine(blackPen, New Point(5, 5), New Point(405, 5))

编译代码

创建 Windows 窗体并处理窗体的 Paint 事件。 将前面的代码粘贴到 Paint 事件处理程序中。

另请参阅

• 使用笔绘制线条和形状