如何应用子窗体来显示数据后，当我们单击任何一条记录，数据都是整行的被选择。下面的代码能帮我们实现，当然，这只是个简单的例子，要真正的实现这个功能，应用ListView 控件是最好的选择。

Private Sub Form_Load()
Dim ctl As Control
For Each ctl In Me.Controls
    If TypeOf ctl Is TextBox or TypeOf ctl Is ComboBox Then
       ctl.OnEnter = "=Enterss"
    End If
Next
End Sub

Sub Enterss()
DoCmd.RunCommand acCmdSelectRecord
End Sub