Case "赵六" Filter = "进度 = '3B' Or 进度 = '4A'" '进度二结束或进度三开始 bj = "4A" Case Else Filter = "" '其他用户加载全部记录 End Select DataTables("表A").LoadFilter = Filter 都没有3B,4A的数据啊 DataTables("表A").Load() '设置本流程开始标记 If bj >"" Then For Each dr As DataRow In DataTables("表A").DataRows dr("进度") = bj Next End If DataTables("表A").Save()
加好友 
发短信
Post By：2013/5/1 21:49:00 [显示全部帖子]
