Private Sub 小时_Enter()
If Not (Me.工厂订单号) Is Null And IsNull(Me.制令单号) Then
MsgBox "--有工厂订单号必须输入制令号,否则请去掉工厂订单号--", vbInformation
Me.小时 = 0
Me.制令单号.SetFocus
End If
End Sub
可是当运行时,系统给了提示是“运行时错误‘424’ 要求对象”。
请问我错在那里了。作者: 一点通 时间: 2006-8-30 17:49
改为这样试下
If Not IsNull(Me.工厂订单号) And IsNull(Me.制令单号) Then作者: liulubing 时间: 2006-9-3 23:01
谢谢.