去编写CurrentChanged事件
If Forms("窗口1").Opened Then
Forms("窗口1").Controls("GroupBox1").Text = e.Table.Current("第二列")
End If