[求助]按条件批量自动填写 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]按条件批量自动填写

共有3728人关注过本帖树形打印复制链接主题：[求助]按条件批量自动填写

ntqhj

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

加好友

发短信

等级：一尾狐帖子：474 积分：2982 威望：0 精华：0 注册：2018/1/15 13:54:00

[求助]按条件批量自动填写 发帖心情

Post By：2020/2/5 15:29:00 [只看该作者]

按条件自动批量填充，帮忙写个代码呗

下载信息 [文件大小：下载次数： ]
点击浏览该文件:按条件批量填充.table

有点蓝

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

加好友

发短信

等级：超级版主帖子：111414 积分：567140 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/2/5 16:03:00 [只看该作者]

支付运费表datacolchanged

Select Case e.DataCol.Name

Case "承运车主" ,"付款状态"

e.DataRow("应付运费") = DataTables("承运人明细表").Compute("Sum(应付运费)","[承运车主] = '" & e.DataRow("承运车主") & "' and 付款状态='" & e.DataRow("付款状态") & "'")

Case "支付结算标识"

If e.DataRow("付款状态") = "未支付"

DataTables("承运人明细表").ReplaceFor("支付结算标识",e.NewValue,"[承运车主] = '" & e.DataRow("承运车主") & "' and 付款状态='未支付'")

End If

End Select

ntqhj

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

加好友

发短信

等级：一尾狐帖子：474 积分：2982 威望：0 精华：0 注册：2018/1/15 13:54:00

Post By：2020/2/7 11:36:00 [只看该作者]

完善了一些想法，请老师帮忙完善下代码

下载信息 [文件大小：下载次数： ]
点击浏览该文件:按条件批量填充.table

有点蓝

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

加好友

发短信

等级：超级版主帖子：111414 积分：567140 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/2/7 12:09:00 [只看该作者]

不要只抛出问题等现成的，请先做，一个问题一个问题的解决，具体代码哪里不通，我可以给修改一下。

如果缺乏代码基础，那么先花点时间学习：http://www.foxtable.com/webhelp/topics/1592.htm

ntqhj

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

加好友

发短信

等级：一尾狐帖子：474 积分：2982 威望：0 精华：0 注册：2018/1/15 13:54:00

Post By：2020/2/7 12:33:00 [只看该作者]

老师讲的是对的。之前是用excel加数据透视表做的，数据已积累了不少，经常出错，很是头痛，所以就购买了foxtabl。我没有编程基础，只有简单的模仿能力，又想着急用起来，还忘老师帮帮我。感谢！感谢！拜托老师了！

有点蓝

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

加好友

发短信

等级：超级版主帖子：111414 积分：567140 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/2/7 14:14:00 [只看该作者]

前面的问题也给了不少类似的用法了。您现在缺的是基础知识，而不是“急”，这东西急不来的

ntqhj

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

加好友

发短信

等级：一尾狐帖子：474 积分：2982 威望：0 精华：0 注册：2018/1/15 13:54:00

Post By：2020/2/7 15:48:00 [只看该作者]

我也花了些时间努力，想自己完成，实在搞不定。的确着急用，一时半会儿我写不出该代码的，还是恳请老师帮忙写下代码。真心感谢！拜托了！

下一主题 >> << 上一主题

主题：[求助]按条件批量自动填写