MS Access双击查询事件

时间:2013-01-23 23:37:10

标签: vba ms-access-2007 access-vba crosstab

MS Access 2007,Win 7 32位

有没有办法在数据表视图中访问开放查询以获取当前字段值和当前字段名称?

我不会把它放到一个表单中,因为它是一个交叉表查询,我必须动态生成和摆脱控件,但我不喜欢用VBA搞乱表单控件。我知道我可以放置动态列报告并在控件上绑定一个事件,但我问是否有事件或对象可以让我直接访问查询。

也许是记录集克隆?但我在谷歌上找不到任何东西。

当然这是在VBA中

致以最诚挚的问候,

2 个答案:

答案 0 :(得分:1)

可以解决您的要求。交叉表包含在子表单中:

Source Object : Query.xtab

crosstab

两个文本框的控制源是:

Ctrl   : =[screen].[activecontrol].[name]
Content: =[screen].[activecontrol]

这意味着它们显示用户在交叉表子表单中选择的列和列内容。但是,他们还会在表单上显示任何其他选定的控件。 ClickMe不会更改所选控件,因此所选项目在文本框中保持不变。

答案 1 :(得分:1)

您还可以输入MacDermott's code来获取当前控件的索引,因此在xtab查询子表单上选择的当前控件将动态显示

Public Function ControlIndex(ctl as Control) as long
 Dim i as Integer
  For i=0 to Me.Controls.Count-1
   if me.Controls(i) is ctl then
    ControlIndex=i
   exit for
  end if
  next
 End Function

最后this可以在同一记录中从一个控件更改为另一个控件时提供帮助,以使文本框保持最新状态。