Построить график Y = sin x – cos x - VB

For x = -8 To 8 Step 0.005
Y = sin * x - cos * x
Picture1.PSet (x, Y), vbRed
Next x
Picture1.Line (-8, 0)-(8, 0), vbBlue
For i = -8 To 8 ' Обцисса
Picture1.PSet (i, 0), vbRed
Picture1.Print i
Next i
Picture1.Line (0, 8)-(0, -8), vbBlue
For i = -8 To 8 ' Ордината
Picture1.PSet (0, i), vbRed
Picture1.Print i
Next i