Sub Process_Globals
Private Point() As Double
End Sub
Sub Globals
End Sub
Sub Activity_Create(FirstTime As Boolean)
Point = Array As Double(10.1, 20.2, 30.3, 40.4, 50.5)
Log(FindMax(Point))
End Sub
Sub FindMax (fm () As Double) As Double
Return fm(1)
End Sub