提供可以描画各种图案线的DLL，描画效率可以与GDIPlus画相同宽度线的函数比美！如可以画铁路线，国境线等等，只要你能提供线图案的模板，该DLL就能高效描画。

使用excel的行、列参数，画铁路线段Sub 铁路线() Worksheets("图示").Select Dim inta As Integer Dim inti As Integer '设置起始行 Dim intj As Integer '设置起始列 Dim intd As Integer inti = 30 '设置行号 intd = 5 'InputBox("请输入图示起始单元格列号", "", "") Do While intd < 4305 For intj = 0 To 19