document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. \' Gambas class file
  2.  
  3. Inherits InterfaceOpcion
  4. Public numero As Integer[] \'lo pongo como array para que se pase por referencia
  5.  
  6. Public Sub comprobar(expresion As String) As Boolean
  7.  
  8.   If expresion = "1" Then
  9.     Return True
  10.   Else
  11.     Return False
  12.   Endif
  13.  
  14. End
  15.  
  16. Public Sub operar(Optional valor As String)
  17.  
  18.   numero[0] += 1
  19.  
  20. End
');