VB中给定相应数组,画出对应曲线,效果还是不错的,可以参照修改