Dim cm As WinForm.ComboBox = e.Form.Controls("报价单号")
Dim dr As DataRow = DataTables("报价主表").Find("报价单号 = '" & cm.Text & "'")
If dr IsNot Nothing Then
e.Form.Controls("客户名称").Value = dr("客户名称")
e.Form.Controls("联系人").Value = dr("联系人")
e.Form.Controls("联系电话").Value = dr("联系电话")
e.Form.Controls("销售员").Value = dr("销售员")
End If
通过上面的命令查找到的内容,为什么不能保存到“合同主表”中,
此主题相关图片如下:qq截图20150326165749.jpg