Nw参加论坛,也可能是编程新手。
我想要提供' 发票号 '文本框,仅当' 发明 时在我的组合框中被选中。
答案 0 :(得分:2)
如果您的表单已绑定,您可以在更新前事件中添加验证,如下所示:
Private Sub Form_BeforeUpdate(Cancel As Integer)
If Me.cboType = "INVOICED" And Nz(Me.InvoiceNo) = vbNullString Then
MsgBox "Invoice No. is required!", vbExclamation, Me.Caption
Me.InvoiceNo.SetFocus
Cancel = True
End If
End Sub
如果是未绑定的表单,请将上述语句(Cancel = True
除外)添加到您的按钮点击事件中。