document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. \' Gambas class file
  2.  
  3. Inherits VehiculodeTransporte
  4.  
  5. Public Function crearVehiculo() As Vehiculo
  6.  
  7.   Dim miMicroBus As New MicroBus
  8.  
  9.   miMicroBus.setcodigo(miMicroBus.generarCodigo())
  10.   Return miMicroBus
  11.  
  12. End
');