请教关于VB＋MapInfo二次开发中打断线的问题。

<DIV >在MapInfo中，如果想打断一条直线，可以先选中这条直线，然后右键“编辑对象” -> “设置对象” ->在工具栏上选择多边形并画出来 ->选择画好的多边形 ->右键“编辑对象” -> “分割” 这样就可以打断一条直线了，但是现在我是用VB来进行二次开发，在VB中如何用代码把上述的过程实现呢？也就是说我点一个按钮后，会自动帮我画好多边形，并且分割好。<BR><BR>Public Sub CreatePolygon(Byval x1 as Integer,Byval y1 as Integer,Byval x2 as Integer,Byval y2 as Integer,Byval x3 as Integer,Byval y3 as Integer,Byval x4 as Integer,Byval y4 as Integer)<BR>    Dim mapInfo as Object<BR><BR>End Sub<BR>x1,y1,x2,y2,x3,y3,x4,y4是多边形四个顶点的坐标，在这个过程中实现画多边形，是否是用mapInfo.do("……")来完成这个操作呢？如果是的话具体应该怎么写呢？？请各位帮帮忙，非常感谢！</DIV>