求教VB黄金分割法求最值，不知道哪里出问题了 大神帮帮忙看看谢谢

--------------------编程问答-------------------- 有图说明i=15 20 25 30 35 40时 f（x）是在区间[1,.1.7]里单峰函数
或者大神门有其他方法求？ 麻烦了 --------------------编程问答-------------------- Command1_Click() 中的 Long 类型全部换成 Double。 --------------------编程问答-------------------- 回复楼上的 改了 结果又都是1了。。。i=40 X=1.6****才对的 --------------------编程问答--------------------

引用 2 楼 Tiger_Zhao 的回复:

Command1_Click() 中的 Long 类型全部换成 Double。

改了 结果又都是1了。。。i=40 X=1.6****才对的 --------------------编程问答-------------------- f() 的返回值也应该是 Double。

自己做个单步调试，看每步的运算是否符合预期。 --------------------编程问答--------------------

引用 5 楼 Tiger_Zhao 的回复:

f() 的返回值也应该是 Double。

自己做个单步调试，看每步的运算是否符合预期。

是不是定义的函数出现问题了 我不输入i的值结果也出来。。。。 --------------------编程问答-------------------- 没看到你调用函数 f() 的部分！
自己检查逻辑。

补充：VB ,  基础类