主题：[求助]为什么有的RecordGrid控件要点击两下才能选中

对，Tabcontrol1的四个页面，各放了一个RecordGrid 。

可能是绑定表的afterselchang中这段事件代码，没包括RecordGrid2/3/4的原因：

If e.OldRange.ColSel <> e.NewRange.ColSel AndAlso e.NewRange.RowSel >= 0
    If Forms("记录窗口录入").Opened
            Dim rg As WinForm.RecordGrid = Forms("记录窗口录入").Controls("RecordGrid1")
            rg.Select()
            Dim rgb  = rg.BaseControl
            Dim cname As String = e.Table.Cols(e.NewRange.ColSel).Name
            For i As Integer = 0 To rgb.Rows.count-1
                If rgb(i, 0) = cname Then
                    rgb.Select(i, 1)
                End If
            Next
        Next
    End If

以前用过的代码，注释掉以后就好了，谢谢版主！

版主，假如这个窗口中有两个页面集合 TabControl2、TabControl3，相互联动，上面的第三行代码这样改怎么不行？

Dim rg As WinForm.RecordGrid = Forms("窗口1").Controls("RecordGrid" & (Forms("窗口1").Controls("TabControl2" or ”TabControl3”).selectedindex+1))