请教老师，参照非关联表之间的数据同步，我加了个条件，如果参加投标的逻辑列勾选后，投标主表同步增加行，并把信息编号和项目名称带入增加行
是否我写的条件位置不对？
Select Case e.DataCol.name '如果项目甄批意见勾选参加投标,项目主表参加投标勾选后,投标主表增加行
Case "信息编号"
If e.DataRow("参加投标") = True Then
Dim dr1 As DataRow = DataTables("投标主表").Find("信息编号 = '" & e.OldValue & "'")
If dr1 Is Nothing Then
dr1 = DataTables("投标主表").AddNew()
dr1("信息编号") = e.DataRow("信息编号")
dr1("项目名称") = e.DataRow("项目名称")
Else
dr1("信息编号") = e.DataRow("信息编号")
End If
End If
Case "项目名称"
Dim dr1 As DataRow = DataTables("投标主表").Find("信息编号 = '" & e.DataRow("信息编号") & "'")
If dr1 IsNot Nothing Then
dr1(e.DataCol.Name) = e.DataRow(e.DataCol.Name)
End If
End Select
加好友 
发短信
Post By：2016/4/5 12:54:00 [显示全部帖子]
