Foxtable(狐表)用户栏目专家坐堂 → 同时自动选择多列内容


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

主题:同时自动选择多列内容

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
同时自动选择多列内容  发帖心情 Post By:2018/5/12 11:45:00 [只看该作者]


Dim tbl As Table = Tables("工程量清单_Table1")
If tbl.Current IsNot Nothing Then
    e.Form.DropDownBox.Value = tbl.Current("支付编号")
End If
e.Form.DropDownBox.CloseDropDown()
以上代码,双击选定行时,只会自动选择支付编号列到表内,我想实现双击时同时自动选择“支付编号”、“细目名称”、“单价”、“单位”等内容,该如何实现,请老师指点

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
  发帖心情 Post By:2018/5/12 11:45:00 [只看该作者]

如下图

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
  发帖心情 Post By:2018/5/12 11:46:00 [只看该作者]

如图
图片点击可在新窗口打开查看此主题相关图片如下:11111.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/5/12 11:48:00 [只看该作者]

Dim tbl As Table = Tables("工程量清单_Table1")
Dim r As Row = Tables("").current
If tbl.Current IsNot Nothing  Then
    e.Form.DropDownBox.Value = tbl.Current("支付编号")
    r("单价")= tbl.Current("单价")
End If
e.Form.DropDownBox.CloseDropDown()

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


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
  发帖心情 Post By:2018/5/12 12:11:00 [只看该作者]

双击选定行的时候出现“不存在名为""的Table

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


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/5/12 14:49:00 [只看该作者]

汗,都不会自己加上个表名?

Dim r As Row = Tables("某某某表").current

 回到顶部