| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 不能通过已删除的行访问该行的信息 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=92560) |
| -- 作者：有点蓝 -- 发布时间：2016/11/7 11:58:00 -- 代码不是 ：订单总表,CurrentChanged事件的吧 贴出正确的CurrentChanged事件代码
[此贴子已经被作者于2016/11/7 11:58:21编辑过]
|
| -- 作者：有点青 -- 发布时间：2016/11/7 12:00:00 -- 改一下试试。 Select Case e.DataCol.Name
Case "客户名称","终端客户","订单类别"
Dim drs As List(Of DataRow) = DataTables("订单明细").Select("订单编号 = \'" & e.DataRow("订单编号") & "\'")
For Each dr As DataRow In drs
dr(e.DataCol.Name) = e.NewValue
Next
End Select
|