diff --git a/Wardrobe/SolidWorks/Frame_3D.vb b/Wardrobe/SolidWorks/Frame_3D.vb index ee55c06..1fabfbf 100644 --- a/Wardrobe/SolidWorks/Frame_3D.vb +++ b/Wardrobe/SolidWorks/Frame_3D.vb @@ -347,7 +347,7 @@ Public Class Frame_3D Dim frameCombDT As New DataTable Dim numOfValues As Integer = l - Dim numOfComb As Integer = Calculate_Factorial(frameLengths.Count) / (Calculate_Factorial(numOfValues) * Calculate_Factorial(frameLengths.Count - numOfValues)) + Dim numOfComb As Long = Calculate_Factorial(frameLengths.Count) / (Calculate_Factorial(numOfValues) * Calculate_Factorial(frameLengths.Count - numOfValues)) For j = 1 To numOfValues frameCombDT.Columns.Add("Enum " & j, GetType(Integer)) @@ -447,7 +447,7 @@ Public Class Frame_3D End Function Private Shared Function Calculate_Factorial(num As Integer) - Dim result As Integer + Dim result As Long If num = 0 Then result = 1 Else