vb'直线逐点比较法