Foxtable(狐表)用户栏目专家坐堂 → 选择表格才能执行


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

主题:选择表格才能执行

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


加好友 发短信
等级:超级版主 帖子:107147 积分:544978 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/19 17:37:00 [显示全部帖子]

dim r as row = tables("窗口1_table1").current
if r is nothing then
MessageBox.Show("未选择表格行")
else
执行代码
endif

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


加好友 发短信
等级:超级版主 帖子:107147 积分:544978 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/20 11:09:00 [显示全部帖子]

就是2楼用法,有什么问题?

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


加好友 发短信
等级:超级版主 帖子:107147 积分:544978 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/20 11:46:00 [显示全部帖子]

肯定已经选中行了。是要选中某一个行,而不是随便选中一行?是要选中没有锁定的行?

Dim r As Row = Tables("采订状态窗口_Table2").current
If r Is Nothing OrElse r.Locked = true Then
    MessageBox.Show("未选择表格行")
Else
……

 回到顶部