跪求高手！关于用键盘向下键改变曲线上点值的大小

Question

我从dat文件里读取了两列数据存放到两个数组里x(9)，y(9),每个数组长度为10，用x(i)和y(i)构成一点，然后用picturebox控件画出了图，求如何用键盘向下和向上键来改变这几个点值大小（曲线上改变），向左向右跳到上一个或下一个点，让整个曲线更平稳，并同时在文本框内显示该点的坐标值。本人新手，不知道用鼠标捕捉曲线上的点还是用键盘捕捉。

Answer 1

Private Sub Picture1_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
        Case vbKeyLeft
                当前点 = 当前点 - 1
               If 当前点 = -1 Then 当前点 = 0
        Case vbKeyRight
                当前点 = 当前点 + 1
                If 当前点 = 10 Then 当前点 = 9
        Case vbKeyUp
                x(当前点) = x(当前点) + 1
        Case vbKeyDown
                x(当前点) = x(当前点) - 1
End Select
Picture1.Cls
Call 画所有点
End Sub