文件名称：获取二值图重心
文件大小：3KB
文件格式：ZIP
更新时间：2015-03-04 13:36:23
二值图 重心
根据杠杆原理获取二值图点阵重心 Type WeightPoint '受力点的重心位置和重量 X As Double Y As Double Weight As Long End Type Type LineDataStruct O As WeightPoint '返回值 'A和B 的重心位置O和重量 AX1Y1 As WeightPoint 'A点 BX2Y2 As WeightPoint 'B点 AB As Double '线段AB的长度，A、B两点间的欧氏距离 BO As Double '线段BO的长度 '以下用于解直线方程 X1EqualX2 As Boolean '当AX1Y1.X = BX2Y2.X时True,AB两点所在直线为 x轴值=X1，否则 y轴值=l * x轴值 + d l As Double 'y轴值=l * x轴值 + d d As Double 'y轴值=l * x轴值 + d '以下用于解二次方程 a As Double b As Double c As Double End Type
【文件预览】：
获取二值图重心
----Module1.bas(3KB)
----Form1.frm(2KB)
----工程1.vbp(652B)
----工程1.vbw(80B)