Better handling for VB.Net Linq expression