标题: 当我录入完一行资料,移到下一行时... [打印本页] 作者: 真主 时间: 2008-1-3 13:20 标题: 当我录入完一行资料,移到下一行时... 当我录入完一行资料,移到下一行时,如果上一行资料没有录入应该录入的,焦点自动回到上一行的空格中,
If Me.进出 = 1 And (IsNull(Me.工作单号) Or IsNull(Me.版别) Or Me.数量 <> 0) Then
ElseIf Me.进出 = 2 And (IsNull(Me.工作单号) Or IsNull(Me.档案号) Or IsNull(Me.明细) _
Or IsNull(Me.色别) Or IsNull(Me.版别) Or Me.数量 <> 0 Or IsNull(Me.晒版员) Or IsNull(Me.补版原因)) Then
End If作者: t小宝 时间: 2008-1-3 13:27
在第一行更新前事件判断
SetFocus 方法移动焦点