Largest Average Women In The World
Recursive functions (VB) ecco due funzioni ricorsive semplici semplici ... io amo le funzioni di questo tipo ... risultano spesso sconvenienti ma sono affascinanti ... e aiutano a ragionare in modo diverso ... la prima è per verificare il numero di dimensioni di una matrice ... la seconda serve a calcolare il fattoriale di un numero ...
Function N_Dim(arr As Variant, Optional ByVal l As Long = 1) As Long On Error Resume Next
ArrayDims = LBound (arr, l) If Err Then
N_Dim N_Dim = (arr, l + 1) End If
End Function Function Fact_If (ByVal N As Long) As Double 'recursive function to calculate the factorial
' of a number N = Fact_If If N = 1 Then Fact_If Fact_If Fact_If * (N - 1)
End Function
0 comments:
Post a Comment