说明：  CAD LISP 此程式应用到ActiveX物件 指定的点或选取的点会自动连到选取线的最近点(垂直点) 选点的方式可一次框选多点,程式会自动过滤掉非点物件, 或连续指定单一点
(CAD LISP this program is applied to ActiveX objects specified points, or selected points will be automatically connected to the select line nearest point (the vertical point) point the way the election could be a框选multi-point, the program will automatically filter out non-point objects, or continuous designate a single point)