Question

Hi people 🙂 I’m having trouble with a null result, when I compare the query it said I cant it give the following error “sequence contains no elements”

Dim existe = (
    From   p In abc.Ventadetalles 
    Where  p.idarticulo = txtArticulo.Text 
    And    p.idventa = IdventaTextBox.Text 
    Select p).Single

here is the code

Answer 1

The following will work:

Dim existe = (
    From   p In abc.Ventadetalles 
    Where  p.idarticulo = txtArticulo.Text 
    And    p.idventa = IdventaTextBox.Text 
    Select p).SingleOrDefault()

If existe Is Not Nothing Then
    '' here you can use existe
End If