aioliadl 发表于：2013-09-23 15:39:12
If Me.是否实际出库 = 0 Then
If Val(bj) >= 0 Then cmd_sjck
Else
MsgBox "库存不足！"
Exit Sub
End If
Else
MsgBox "已实际出库，不能再进行出库", vbCritical, "提示"
Exit Sub
End If
If Me.是否实际出库 = 0 Then
If Val(bj) >= 0 Then 'cmd_sjck 'cmd_sjck是什么意思？
Else
MsgBox "库存不足！"
End If
Else
MsgBox "已实际出库，不能再进行出库", vbCritical, "提示"
End If
If Me.是否实际出库 = 0 Then
If Val(bj) >= 0 Then call cmd_sjck<---这个应该是个按扭来的吧？
Else
MsgBox "库存不足！"
Exit Sub
End If
Else
MsgBox "已实际出库，不能再进行出库", vbCritical, "提示"
Exit Sub
End If
cmd_sjck是不是事件的名称？ 如果是请在前面加上call。
If Me.是否实际出库 = 0 Then
If Val(bj) >= 0 Then
cmd_sjck
Else
MsgBox "库存不足！"
Exit Sub
End If
Else
MsgBox "已实际出库，不能再进行出库", vbCritical, "提示"
Exit Sub
End If
这样代码总提示：编译错误：ELSE 没有 IF
是怎么回事呢啊.....
叶老师正解，原来cmd_sjck必须在下一行，不然就会出现这种情况！
cmd_sjck 是按钮 ，54.℡80後2oO你懂我~
感谢大家热心解答
总记录：6篇 页次：1/1 9 1 :
