利用试算法，计算公式为谢才公式，用VB6编程。 比较流量模数最接近的为所求。 可以计算梯形、矩形断面渠道的过流能力，当为矩形断面时1：m中输入0.00000001即可。