If e.Col.Name = "第一列" Then If e.RecordGrid Is Nothing Then '如果是在表中输入数据 If e.Col.DroppedDown = False Then e.Col.OpenDropDown() End If Else '如果是记录窗口在输入数据 If e.RecordGrid .DroppedDown = False Then e.RecordGrid.OpenDropDown() End If End IfEnd If