Определенный интеграл - VB

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

Доброго времени суток! Помогите, пожалуйста, с курсачем. Мысль в чем. Нужно посчитать значение интеграла методом Монте-Карло. Сам метод я понимаю, но реализовать не получается. А именно, как ограничить попадание точек под график и посчитать количество оных. Сама функция долбанутая:

                    Листинг программы
                
f = 2 * Exp(x ^ ((x - 4) / 8)) - 2 * x + (4 * Sin((x / 4) ^ 2 + x)) ^ 2

это уже функция, т.е.

                    Листинг программы
                
Private Function f(x)
 
f = 2 * Exp(x ^ ((x - 4) / 8)) - 2 * x + (4 * Sin((x / 4) ^ 2 + x)) ^ 2
 
End Function

Искал по форуму, нашел реализацию метода, но применить к данной ситуации - никак. Заранее благодарю.

Решение задачи: «Определенный интеграл»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Private Sub Command1_Click()
Dim s!, x!, f1!, f2!, f3!, f4!,i!
s = 0
'f3 = InputBox("Ввведите верхний предел")
'f4 = InputBox("Ввведите нижний предел")
f4 = InputBox("Ввведите количество точек")
For i = 1 To f4 
x=rnd(1) ' от 0 до 1 - 
 f1 = 2 * Exp(x ^ ((x - 4) / 8)) - 2 * x + (4 * Sin((x / 4) ^ 2 + x)) ^ 2
 s = s + f1
Next i
MsgBox "Ploshad opredelennogo integrala = " & s
End Sub