- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何实现这样的主流单元格按钮？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=28689)
-- 发布时间：2013/2/12 19:59:00
-- 如何实现这样的主流单元格按钮？
此主题相关图片如下：未命名.jpg
如何实现上表中的操作列中的明细按钮？
点击明细按钮后会出现明细数据
[此贴子已经被作者于2013-2-12 20:05:00编辑过]
-- 发布时间：2013/2/12 20:21:00
--
http://www.foxtable.com/help/topics/2387.htm
-- 发布时间：2013/2/12 20:42:00
--
操作列中的明细二字不是按钮，而是文字，但也能实现点击单元格后出现明细数据。
-- 发布时间：2013/2/13 12:08:00
--
在列的单击事件中写
-- 发布时间：2013/2/14 9:45:00
--
可以指点一下吗？用哪个事件？万分感谢！
-- 发布时间：2013/2/14 10:49:00
--
如果只是想查看明细，何不直接用关联表来解决？
-- 发布时间：2013/2/14 11:00:00
--
不喜欢关联表。
这个更人性化。
我想问这个如何实现？
-- 发布时间：2013/2/14 17:53:00
--
主表click事件：
If e.col.name = "操作" Then
Select Case e.Table.Current("品名规格")
Case "371A"
MainTable = Tables("XX明细")
Tables("XX明细").filter = ("品名规格 = \'371A\'")
Case Else
Return
End Select
End If
更为通用的代码：
If e.col.name = "操作" Then
Dim s As String = e.Table.Current("品名规格")
MainTable = Tables("XX明细")
Tables("XX明细").filter = ("品名规格 = \'" & s & "\'")
End If
已经验证，但用无妨。
温馨提示：
表的单击事件，不区分左右键，千万不要把删除、修改之类的代码或者负荷太重的代码写在表的单击事件中了，不然将后悔莫及。
[此贴子已经被作者于2013-2-14 19:06:30编辑过]
-- 发布时间：2013/2/14 18:00:00
--
主流? CellButton行不?
-- 发布时间：2013/2/16 11:15:00
--
楼主，这个简单的。点击明细的时候弹出一个窗口就行了，窗口里筛选出对应的数据。
具体问题，你就上传个数据例子吧。