Вычислить значение выражения - VB (59574)

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

Никак не могу написать программу на Visual Basic, по причине того, что вообще ничего не понимаю, а задание скоро надо сдавать! Помогите пожалуйста! Данo натуральное число n. Вычислить: у=(2n)!!=2*4*.....(2n), n>0;

Решение задачи: «Вычислить значение выражения»

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

                            print faktorial(2 * n)
End Sub
 
Function faktorial(n As Integer) As Long
If n = 0 Then
faktorial = 1 
Else
faktorial = n * faktorial(n - 2)
End If
End Function
                        