Saturday, June 6, 2009

largest number function

Function largestNumber(ByVal num1 As Integer, ByVal num2 As Integer, ByVal num3 As Integer) As Integer
Dim largestNum = num1
If num2 > largestNum Then
largestNum = num2
End If
If num3 > largestNum Then
largestNum = num3
End If
Return largestNum
End Function

No comments: