ZKX's LAB

VB如何实现平滑曲线 vb中如何画光滑曲线

2021-04-05知识7

vb怎么将多个点用光滑曲线连起来,并画出 再光滑折线啊折线短点光滑要弄类似条曲线算看看

如何利用VB根据一个公式生成一条曲线啊? Private Sub Command1_Click()Dim i As LongForm1.ClsForm1.CurrentX=500Form1.CurrentY=Form1.Height-1500Form1.Line-(Form1.Width-500,Form1.Height-1500)'生成横坐标Form1.CurrentX=500+(Form1.Width-1000)/2Form1.CurrentY=Form1.Height-6000Form1.Line-(500+(Form1.Width-1000)/2,Form1.Height-1500)'生成纵坐标Form1.CurrentX=(Form1.Width-1000)/2+500+(-6)*100Form1.CurrentY=Form1.Height-1500-(-6)^2*100For i=-5 To 6Form1.Line-((Form1.Width-1000)/2+500+i*100,Form1.Height-1500-i^2*100)Next iEnd Sub这段代码是Y=X^2的曲线,曲线光滑度设定的不是很高,为了便于理解。例子很简单:希望对你能有启发:)

VB如何实现平滑曲线 VB好久没用,不过我知道里面要画平滑曲线要用到一个函数。好象是Line.具体怎么写,我忘了,你自己查查。

#vb中如何画光滑曲线

随机阅读

qrcode
访问手机版