謝謝狐爸指導!!
出現錯誤,表名沒有定義.
for each dr as datarow in DataTabls("emp").Datarows
dr("离职日期") = dr("离职日期").trim
Next
DataTabls("emp").Save