我想在RichEditbox、 PictureBox 、Form上绘一些很光滑的曲线,我不知道用什么样的算法、怎么样的函数、如何绘。我想在此请教各位给我提供一些算法,函数或具体VB程序代码,谢谢

解决方案 »

  1.   

    什么曲线,说清楚些vb提供了一些画图函数,如line,pset,circle等
      

  2.   

    简单代码如下,测试通过
    功能就是在窗体上画任意光滑的曲线Dim x1 As Long
    Dim y1 As Long
    Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
        x1 = X
        y1 = Y
    End SubPrivate Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
        Line (x1, y1)-(X, Y)
        x1 = X
        y1 = Y
    End Sub