Foxtable(狐表)用户栏目专家坐堂 → 设置table中列的值


  共有2022人关注过本帖树形打印复制链接

主题:设置table中列的值

帅哥哟,离线,有人找我吗?
ycs5801
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:6913 威望:0 精华:0 注册:2009/6/24 9:44:00
设置table中列的值  发帖心情 Post By:2023/3/16 11:06:00 [只看该作者]

If Tables("员工点餐表").Current Is Nothing Then
    MessageBox.Show("未选中菜品")
Else
   ?   
End If

 

上边是在窗口中设置了一个按钮,点击按钮如果未在table中选定行,则提示未选中菜品,如果选中了行,则将此行的菜品列中的值提取出来,假如是扬州炒饭,将table中所有行中的菜品列等于扬州炒饭的是否完完成列,设置为true。

 

dim caipin as string=Tables("订单").Current("菜品")

Tables("员工点餐表").Filter = "[菜品]='" & caipin & "'"

DataTables("员工点餐表").ReplaceFor("制作完成", true, Tables("员工点餐表").Filter)

 

这样对吗

[此贴子已经被作者于2023/3/16 11:08:45编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/16 11:09:00 [只看该作者]

dim caipin as string=Tables("订单").Current("菜品")

DataTables("员工点餐表").ReplaceFor("菜品"true"[菜品]='" & caipin & "'")


 回到顶部
帅哥哟,离线,有人找我吗?
ycs5801
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:6913 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2023/3/16 11:32:00 [只看该作者]

这种只替换了table中的行,不会替换后台符合条件的行吧?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/16 11:53:00 [只看该作者]

只替换已经加载的数据。
[此贴子已经被作者于2023/3/16 11:53:24编辑过]

 回到顶部