ocr: MI LEl - Iyrannosaur - D X Animal Bite Option Explicit Age PropertyGet) Age PropertyLet] Bite Imp lements Animal Move Private runction Animal Move (Byval Distance As Double) As Double Dim oiDistancenoved As Double Code to calculate how far to pounce, based on age, state of health, and oostacies. Result is placed in the variable oiDistancemoved. Debug.Print "lyrannosaur moved "; - cbiDistanceMoved Animal Move = dblDistancelloved End runction Private Sub Animal Bite Byval What As Object) Code to take a pound of flesh (omitted) Debug.Print "lyrannosaur bit a rr & TypeName (What) End Sub
(.png)
