VB中一个分母为0的问题……

高中一年级新教材第三章第2节，有个VB编程问题（画y=x^2的图象），其原始代码是这样的：
Private Sub Command1_Click()                      '确定按钮单击事件
    Dim x, y As Single                            '定义x,y两个变量
    Picture1.Scale (-10, 25)-(10, -25)            '定义坐标系
    Picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255)  '画横坐标轴，颜色为蓝色
    Picture1.Line (0, 25)-(0, -25), RGB(0, 0, 255)  '画纵坐标轴，颜色为蓝色
    '用循环语句描点画函数图像
    For x = -10 To 10 Step 0.0001                    'x值从-10变化到10，每次增量为0.0001
      y = x ^ 2                                    '根据表达式y=x2来计算y值
      Picture1.PSet (x, y), RGB(255, 0, 0)        '根据x,y的值用红色描点
    Next x                                          '取下一个增量后的x值
End Sub                  &