Что делать если выскакивает эта ошибка?

Question

[hellcaster]

Все время выскакивает ошибка:

Run-time error '5':
Invalid procedure call or argument

Вот код

Function y(x)
y = 8.4 + (((x + 2.4) * Log(Abs(x))) / ((2 * x + 3) * (x + 8)))
End Function
Private Sub CommandButton2_Click()
Dim i As Double, step As Double, BoxCount As Double
i = 10
step = 0.1 * i
BoxCount = 1
    For x = 0 To i Step step
        UserForm1.Controls("TextBox" & BoxCount).text = x
        BoxCount = BoxCount + 1
        UserForm1.Controls("TextBox" & BoxCount).text = y(x)
        BoxCount = BoxCount + 1
    Next x
End Sub

Нажимая на кнопку Debug мне подсвечивается

y = 8.4 + (((x + 2.4) * Log(Abs(x))) / ((2 * x + 3) * (x + 8)))

Comments

[h8nor]

Не мучайтесь из-за сестры или учитесь пользоваться отладчиком: View -> Locals Window

ЗЫ: Аргументы функции указываются в скобках через запятую, а тип значения функции справа за скобками:
Function y(ByVal x As Integer) As Double

[hellcaster]

Дѣаволъ, как здесь не мучатся, если оставят на повторный курс))

[h8nor]

Так сестру же. Не вас ) Пусть грызёт гранит. Рекомендую канал Бурхаева, чтобы влиться немного в тему.

Answer 1

[shushpanio]

не объявлены переменные у и х