[Gambas-user] difference ME and SUPER with inherit

[BB]

*ClassA*

Public Function  DoThis(X as integer) as Integer

     Return X/2

End

*ClassB*

Public Function DoThis(Y as Integer) as Integer

     If "IsOdd"(Y) then

         Return Super.DoThis(Y-1)

     Else

         Return(X*2)

End

Public Sub Main

Dim I as Integer

     For I = 1 to 10

         Print DoThis(I)

     End

End


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.gambas-basic.org/pipermail/user/attachments/20230310/e8b28694/attachment-0001.htm>