怎么用VB软件通过迭代法求沉没深度？
已知沉没压力Pin，要求用迭代法求液面深度！公式为?Po=g（1-?i）ρogi ?hi，Po=Po+?Po，其中的参数能够求取，满足条件后怎么判定可以结束了！条件是：如果?Po<pin，继续迭代，，如果Po>pin,h=(po-pin)/(ρogi*g)，直到（pin-po）/pin<0.05.
想了n久，求高手解答！！先行谢过了！ 迭代 软件 VB
[解决办法]
参考：http://bbs.csdn.net/topics/390086619
