改成这样
If e.datacol.name = "签约日期" andalso (e.oldvalue <> Nothing Andalso e.newvalue <> Nothing) AndAlso e.DataRow("支付方式") Like "预付*" then