用VB实现船舶运动航迹控制轨迹