Foxtable(狐表)用户栏目专家坐堂 → 窗口内控件绑定到不同表同一列名


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

主题:窗口内控件绑定到不同表同一列名

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


加好友 发短信
等级:狐精 帖子:3048 积分:20394 威望:0 精华:0 注册:2016/3/28 16:57:00
窗口内控件绑定到不同表同一列名  发帖心情 Post By:2017/3/28 10:10:00 [只看该作者]

有个状态窗口,有多个表同时使用,当表A打开时,状态保存到表A“第一列",表B打开时,状态保存到表B“第一列",表C打开时,状态保存到表C“第一列"...........,怎么实现呢?

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


加好友 发短信
等级:狐精 帖子:3048 积分:20394 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2017/3/28 10:38:00 [只看该作者]

以下是引用cd_tdh在2017/3/28 10:10:00的发言:
有个状态窗口,有多个表同时使用,当表A打开时,状态保存到表A“第一列",表B打开时,状态保存到表B“第一列",表C打开时,状态保存到表C“第一列"...........,怎么实现呢?

已用MessageBox加判断的方法处理,请老师些看哈有没逻辑问题:

Dim a As Row = Tables("打保证金表").Current
Dim Result As DialogResult
 If a("保证金状态") = Nothing Then
MessageBox.Show("对方支付申请还未完成!", "提示")
Else
 Result = MessageBox.Show("你确认制单完成吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
 If Result = DialogResult.Yes  Then
    a("保证金状态") = "已制单完成"
Else
End If
End If


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/28 11:06:00 [只看该作者]

 2楼代码没问题。当前表,你可以用 CurrentTable

 

 你可以在打开窗口之前,设置一下是哪个表打开的,如代码

 

vars("表") = "表A"

Forms("窗口1").Show


 回到顶部