新增的时候，这样写没问题。
当找到对应行的时候，你不能那样写了。对于本来有值的列，不需要再赋值
If dr("消费早餐") = nothing Then
dr("消费早餐") = e.PostValues("消费早餐")
End If
加好友 
发短信
Post By：2019/5/24 11:51:00 [只看该作者]
