紧急求助，大神帮下帮，条件填充的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 紧急求助，大神帮下帮，条件填充的问题

共有1844人关注过本帖树形打印复制链接主题：紧急求助，大神帮下帮，条件填充的问题

有点甜

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

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/5/20 16:38:00 [显示全部帖子]

参考代码

Dim t As Table = Tables("B001HYZLB")
Dim r As Row = t.current
'获取某行的1级下属
For Each dr As DataRow In t.DataTable.Select("B001HYZLB_JueDuiCchengJi=" & r("B001HYZLB_JueDuiCchengJi")+1 & " And B001HYZLB_CengJiMa Like '" & r("B001HYZLB_CengJiMa") & "%'")
output.show(dr("B001HYZLB_DianZiDingDanHao") & " " & dr("B001HYZLB_YongHuID") & " " & dr("B001HYZLB_CengJiMa"))
Next

[此贴子已经被作者于2018/5/20 16:37:58编辑过]

有点甜

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

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/5/20 20:44:00 [显示全部帖子]

打开命令窗口测试。看懂代码啊

http://www.foxtable.com/webhelp/scr/0213.htm

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

主题：紧急求助，大神帮下帮，条件填充的问题