问题描述 代码如下:PublicClassForm1DimPath(,)AsInteger,fun(,)AsSingle,q0(,),v0AsSingleDimz(,)AsSingle,v(,)AsSinglePrivateSubForm1_Load(senderAsObject,eAsEventArgs)HandlesMyBase.LoadFori=1ToUBound(Q)Forj=1Tonz(i,j)=zmax-(zmax-zmin)/(n-1)*(j-1)Call插值图(mmg,gz,gv