auto

' Gambas class file

Private cantidadDePuertas As Integer
Private modelo As String
Private marca As String
Private CaracteristicasMoTor As Motor

Public Function getCantidadDePuertas() As Integer

  Return cantidadDePuertas

End

Public Sub setCantidadDePuertas(cantidad As Integer)

  cantidadDePuertas = cantidadDePuertas

End

Public Function getModelo() As String

  Return modelo

End

Public Sub setModelo(m As String)

  modelo = m

End

Public Function getmarca() As String

  Return marca

End

Public Sub setmarca(m As String)

  marca = m

End

Public Function getMotor() As Motor

  Return CaracteristicasMoTor

End

Public Sub setmotor(m As Motor)

  CaracteristicasMoTor = m

End