If e.Table.Current Is Nothing Then '如果Current为Nothing Return '则返回End IfTables("客户").Filter = "[客户ID] = '" & e.Table.Current("客户ID") & "'"