主题：关于将Table中某行的内容显示到对话框中

我想将Table中某行显示到对话框中对应的TextBox控件位置，我该怎么写代码呢

用个Label控件.绑定这个字段

 你可以在currentChanged事件写代码，比如

 

If Forms("窗口1").Opened Then

    Forms("窗口1").Controls("TextBox1").Text = e.Table.Current("第一列")

End If

没听明白

我就想在第一个图中双击某行，显示第二个图，并将对应内容写进去

此主题相关图片如下：1.png


此主题相关图片如下：2.png

1.用3楼的代码

在哪个的CurrentChanged事件中写代码啊

  可以写到doubleclick事件

 

If Forms("窗口1").Opened Then

    Forms("窗口1").Controls("TextBox1").Text = e.Table.Current("第一列")

End If

 

 或者去写AfterLoad事件

 

Forms("窗口1").Controls("TextBox1").Text = Tables("表A").Current("第一列")

我该在哪里打开窗口啊，本来想在双击事件中打开之后执行你写的那部分代码，但是提示说窗口没打开怎么办

 

如果你的窗口是模式窗口，就去窗口的AfterLoad事件写代码，如

 

Forms("窗口1").Controls("TextBox1").Text = Tables("表A").Current("第一列")

 

独立窗口