Métodos en Linq Para Listar, Insertar, Actualizar, Buscar y Eliminar

1.- Listar

Para cada operación crearemos un método comenzaremos con el método que lista todos los registros de nuestra tabla.

public static List<Personas> CargarDatos()

{

    using (DatabaseEntities bd = new DatabaseEntities())

    {

       var datos = (from p in bd.Personas select p).ToList();

 

        return datos;

    }

}

Public Shared Function CargarDatos() As List(Of Personas)

      Using bd As New DatabaseEntities()

          Dim datos = (From p In bd.Personas Select p).ToList()

 

          Return datos

      End Using

  End Function




2.- Insertar

public static void Agregar(string nombre, string apellido, int edad,string profesion)

      {

          using (DatabaseEntities bd = new DatabaseEntities())

          {

              bd.Personas.AddObject(new Personas { Nombre = nombre, Apellido = apellido, Edad = edad, Profesion = profesion });

              bd.SaveChanges();

          }

      }

Public Shared Sub Agregar(ByVal nombre As String, ByVal apellido As String, ByVal edad As Integer, ByVal profesion As String)

      Using bd As New DatabaseEntities()

          bd.Personas.AddObject(New Personas() With {.Nombre = nombre, .Apellido = apellido, .Edad = edad, .Profesion = profesion})

          bd.SaveChanges()

      End Using

  End Sub




3.- Actualizar




public static void Editar(int id,string nombre, string apellido, int edad, string profesion)

      {

          using (DatabaseEntities bd = new DatabaseEntities())

          {

              var editar = (from p in bd.Personas

                            where p.Id == id

                            select p).Single();

 

              editar.Nombre = nombre;

              editar.Apellido = apellido;

              editar.Edad = edad;

              editar.Profesion = profesion;

              bd.SaveChanges();

          }

      }

Public Shared Sub Editar(ByVal id As Integer, ByVal nombre As String, ByVal apellido As String, ByVal edad As Integer, ByVal profesion As String)

      Using bd As New DatabaseEntities()

          Dim editar = (From p In bd.Personas

                        Where p.Id = id

                        Select p).Single()

 

          editar.Nombre = nombre

          editar.Apellido = apellido

          editar.Edad = edad

          editar.Profesion = profesion

          bd.SaveChanges()

      End Using

  End Sub




4.- Buscar




public static List<Personas> Buscar(string nombre)

{

    using (DatabaseEntities bd = new DatabaseEntities())

    {

        var buscar = (from p in bd.Personas

                      where p.Nombre.StartsWith(nombre)

                      select p).ToList();

 

        return buscar;               

    }

}

Public Shared Function Buscar(ByVal nombre As String) As List(Of Personas)

      Using bd As New DatabaseEntities()

          Dim busca = (From p In bd.Personas

                       Where p.Nombre.StartsWith(nombre)

                       Select p).ToList()

 

          Return busca

      End Using

  End Function




5.- Eliminar




public static void Eliminar(int id)

      {

          using (DatabaseEntities bd = new DatabaseEntities())

          {

              var eliminar = (from p in bd.Personas

                              where p.Id==id

                              select p).Single();

 

              bd.DeleteObject(eliminar);

              bd.SaveChanges();

          }

      }

Public Shared Sub Eliminar(ByVal id As Integer)

      Using bd As New DatabaseEntities()

          Dim eliminar = (From p In bd.Personas

                          Where p.Id = id

                          Select p).Single()

 

          bd.DeleteObject(eliminar)

          bd.SaveChanges()

      End Using

  End Sub