function takes two arguments's length and width's and calculates the total area by multiplying them together
Function Area(Length, Width) Area = Length * Width End Function Sub aSub() MsgBox Area(100, 50) End Sub