关于VB绘制函数图像的问题

Question

Dim y(6) As Single
Dim x As Single
Dim i As Integer
Cls
y(0) = 1
x = 0
i = 0
Do While x < 0.6
y(i + 1) = y(i) + 0.1 * (x - y(i) + 1)
Print Format(x, "#0.0"), Format(y(i), "#0.000000")
i = i + l
x = x + 0.1
Loop
这是用数值方法计算一个常微分方程的算法，每次都会计算出一组x与y（i），我现在想用VB将这些x为横坐标y（i）为纵坐标的点绘制出来，再将这些点连接为一个图像，可以的话将y(i + 1) = y(i) + 0.1 * (x - y(i) + 1)这个方程的函数图像绘制出来更好，求助各位大侠帮帮小弟，最好能详细点，谢谢！！！