list.findall方法应该如何写?

list.findall方法应该怎么写???
lstPathNew = lstPath.FindAll(Function( value as model)return value.id=ID end function)
这么写报错，错误是：应为表达式
请问该怎么改？？？？？

[解决办法]

VB.NET code

lstPathNew = lstPath.FindAll(AddressOf MyFind)private Function MyFind( value as model) as boolean  return value.id=ID end function