Function Driehoeksgetal(n)
If n > 1 Then
    Driehoeksgetal = Driehoeksgetal(n - 1) + n
Else
    Driehoeksgetal = 1
End If
End Function