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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 条件语句改写

共有4192人关注过本帖树形打印复制链接主题：条件语句改写

wangglby

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

等级：小狐帖子：337 积分：3225 威望：0 精华：0 注册：2020/2/25 23:12:00

条件语句改写 发帖心情

Post By：2021/7/22 14:54:00 [显示全部帖子]

请教下，以下表的 datacolchanged 代码

CSng(right(dr("材料标识"),(dr("材料标识")).length-dr("材料标识").Indexof(">")-1) ) = 2

想改成一个 filter 放在窗口 afterload 代码里，

请问怎么改

wangglby

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

等级：小狐帖子：337 积分：3225 威望：0 精华：0 注册：2020/2/25 23:12:00

Post By：2021/7/22 15:07:00 [显示全部帖子]

材料标识一般是这样的 “板材<q235>6”

想筛选 “>” 右边的数字（可能是小数），按指定的值进行筛选

比如在表D的材料标识列做个筛选，筛选 “>” 右边的数字等于 b 的行

Dim b As Single= Tables("表A").current("物料信息_厚")

filter = " 材料标识 = '" & b & "' "

DataTables("表d").loadFilter = filter

DataTables("表d").load选

[此贴子已经被作者于2021/7/22 15:16:37编辑过]

wangglby

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

等级：小狐帖子：337 积分：3225 威望：0 精华：0 注册：2020/2/25 23:12:00

Post By：2021/7/22 15:18:00 [显示全部帖子]

加载条件怎么写的

主题：条件语句改写