[求助]AppendLoadAsync Post By:2015/8/8 19:19:00 [显示全部帖子]
Dim flt As String Dim drs As List(Of DataRow) flt = "接收者 = '" & User.Name & "' And 接收时间 Is Null" drs = DataTables("信息表").AppendLoad(flt, False) For Each dr As DataRow In drs dr("接收时间") = Date.Now() dr.Save() Next