Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h. - VB

Формулировка задачи:

Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h. Результат представить в виде таблицы, первый столбец которой — значения аргумента, вто¬рой — соответствующие значения функции:3. F(x) = 2cosx – 1 Заранее благодарю!

Решение задачи: «Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.»

textual
                            Листинг программы 
                        

                            Private Sub Command1_Click()
Dim F As Single, index As Integer, a As Single, b As Single, h As Single
List1.AddItem "X" & Space(10) & "F(X)"
a = InputBox("A")
b = InputBox("B")
h = InputBox("step h")
For x = a To b Step h
List1.AddItem x & Space(10) & Round(2 * Cos(x) - 1, 4)
Next x
End Sub
                        