document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. \' Gambas class file
  2.  
  3. Private sueldo As Float
  4.  
  5. Public Sub setsueldo(cantidad As Float)
  6.  
  7.   sueldo = cantidad
  8.  
  9. End
  10.  
  11. Public Function getSueldo() As Float
  12.  
  13.   Return sueldo
  14.  
  15. End
  16.  
  17. Public Sub cobrar()
  18.  
  19.   Print "He cobrado....mi sueldo: " & Str$(sueldo)
  20.  
  21. End
');