VB牛顿迭代法、二分法和弦截法解一元三次方程

VB 牛顿迭代法、二分法和弦截法解一元三次方程‍Option ExplicitPrivate a As Double, b As Double, c As Double, d As Double, x