水力曲线VB编,内有代码,可以下载后参考,亦可以进行改动,使之更完善!