根据组合框选择制作所需的单元格

时间:2014-10-22 22:08:21

标签: ms-access access-vba

Nw参加论坛,也可能是编程新手。

我想要提供' 发票号 '文本框,仅当' 发明 时在我的组合框中被选中。

1 个答案:

答案 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除外)添加到您的按钮点击事件中。