Hi,
How about the following?
dt1.AsEnumerable.Any(Function(r) r("Shipment").ToString="G05468")
Regards,