Dim dr As Row = Tables("采购过程监控系统").Current
If dr.IsNull("技术协议与合同签定_负责人") = False Then '如果负责人不为空 Else End If