DataColChanged改写入库单列表的入库编号 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → DataColChanged改写入库单列表的入库编号

共有4634人关注过本帖树形打印复制链接主题：DataColChanged改写入库单列表的入库编号

lfz

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：49 积分：494 威望：0 精华：0 注册：2021/11/16 13:45:00

DataColChanged改写入库单列表的入库编号 发帖心情

Post By：2021/12/6 11:36:00 [显示全部帖子]

DataColChanged改写入库单列表的入库编号

1 2 3都跳出来了,为啥结果出不来呢

Select Case e.DataCol.Name '更改供应商简称则更改入库单列表里的供应商简称和编码

Case "供应商简称"

Dim dr As DataRow = DataTables("入库单列表").SQLfind("入库编号 = '"& e.datarow("入库编号") & "'")

MessageBox.Show(1)

If dr IsNot Nothing Then

MessageBox.Show(2)

dr("供应商简称") = e.DataRow("供应商简称")

MessageBox.Show(3)

End If

End Select

lfz

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：49 积分：494 威望：0 精华：0 注册：2021/11/16 13:45:00

回复：（cd_tdh） e.DataRow("供应商简称") = dr... 发帖心情

Post By：2021/12/6 13:07:00 [显示全部帖子]

我是在入库单的DataColChanged写的代码,目的是:更改入库单里面的供应商简称时,找到入库单列表里面的一行对应行(入库单编号查找)更改其供应商简称,我理解方向应该是没有反的吧

主题：DataColChanged改写入库单列表的入库编号