Posts Tagged ‘objetos’

C# : Creación de Clases y objetos

Ahora un post casi casi calcando al anterior pero con C Sharp…

Class Coche
{
    public string Modelo;
    public double Precio;
    public int NumeroDeVelocidades
    private int Velocidad

    public void Acelerar(int km)
    {
       Velocidad = Velocidad + km;
    }

    public void Frenar()
    {
       if (Velocidad > 0)
       {
          Velocidad = Velocidad - 1;
       }
    }

    public int ConsultarVelocidad()
    {
       return Velocidad;
    }
}

Al igual que en post anterior, podemos encontrar como propiedades de la Clase : Modelo, Precio, NumeroDeVelocidades y Velocidad, y como métodos de la clase : Acelerar(km) , Frenar() y ConsultarVelocidad().

Y mostraremos también como instanciar dicha clase :

Coche objCoche = new Coche();

int VelocidadActual;

objCoche .Modelo = "Montaña";
objCoche .Precio = 200;
objCoche .NumeroDeVelocidades = 21;

objCoche .Acelerar(5);
objCoche .Frenar();

VelocidadActual = objCoche .ConsultarVelocidad();
Share

Vb.net : Creación de Clases y objetos

Os dejo un Snippet de los básicos, la estructura de una clase en Vb.net :

Public Class Coche
    Public Modelo as String
    Public Precio as Double
    Public NumeroDeVelocidades as Integer
    Private Velocidad as Integer

    Public Sub Acelerar(ByVal km As Integer)
       Velocidad = Velocidad + km
    End Sub

    Public Sub Frenar()
       If Velocidad > 0 Then
          Velocidad = Velocidad -1
       End If
    End Sub

    Public Function ConsutarVelocidad() As Integer
       Return Velocidad
    End Function
End Class

Podremos apreciar como propiedades de la Clase : Modelo, Precio, NumeroDeVelocidades y Velocidad, y como métodos de la clase : Acelerar(km) , Frenar() y ConsultarVelocidad().

Y ahora una muestra de como instanciar dicha clase :

Dim objCoche as Coche= New Coche

Dim VelocidadActual as Integer

objCoche .Modelo = "Seiscento"
objCoche .Precio = 200
objCoche .NumeroDeVelocidades = 21

objCoche .Acelerar(5)
objCoche .Frenar()

VelocidadActual = objCoche .ConsultarVelocidad
Share