假设我将数量文本框限制只能输入数字，想实现的目的是如果输入字符就清空该文本框，并将光标停留在此处

常规思路是：

Private Sub 数量_AfterUpdate()
If IsNumeric(Me.数量) = False Then
Me.数量 = Null
Me.数量.SetFocus
End If
End Sub

结果发现不行，还是跳到价格控件去了

后来尝试好久，终于发现需要先指定下一个控件获得焦点（也就是用以上的方法运行后，先将价格控件获得焦点/光标），然后再将数量控件获得光标/焦点，具体如下：

Private Sub 数量_AfterUpdate()
If IsNumeric(Me.数量) = False Then
Me.数量 = Null
Me.价格.SetFocus
Me.数量.SetFocus
End If
End Sub