Código vb:
Ver original
Public Class BusquedaRapidaArt Dim tablaOrigen As DataTable Dim tablaDestino As DataTable Private Sub BusquedaRapidaArt_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load 'Método que retorna un datatable que seria 'la dt tablaOrigen End Sub 'Evento TxtChange, TextBuscar es el control para buscar Private Sub TextBuscar_TextChanged(sender As System.Object, e As System.EventArgs) Handles TextBuscar.TextChanged Dim query = From nombre In tablaOrigen.AsEnumerable() Where nombre.Field(Of String)("nombre").StartsWith(TextBuscar.Text) Or nombre.Field(Of String)("nombre").EndsWith(TextBuscar.Text) tablaDestino = query.CopyToDataTable() If tablaDestino.Rows.Count <> 0 Then dg1.DataSource = tablaDestino ' cargar el tabladestino a un DataGrid End If End Sub End Class
Cuando testeo me arroja esta exepción......
The source contains no DataRows.
Gracias por su apoyo~