关于七参数计算VB代码X,Y,Z=X1,Y1,ZY