Vba 如何通过从表单中的组合框中选择选项来禁用其他字段_Vba_Forms_Ms Access_Combobox

Vba 如何通过从表单中的组合框中选择选项来禁用其他字段

vba forms ms-access combobox

Vba 如何通过从表单中的组合框中选择选项来禁用其他字段,vba,forms,ms-access,combobox,Vba,Forms,Ms Access,Combobox,我有一个奶牛场记录数据库。它有一个表格，我有奶牛的细节和它们的照片。我有一个表格字段[性别]。当我从这个字段[性别]中选择[男性]时，我想要这个。它应该禁用表单上的其他字段。当我选择[女性]时。它应该启用表单上的其他字段。如果选择为[男性]，则窗体应打开，字段为禁用；如果选择为[女性]，则窗体应打开，字段为启用 Private Sub Gender AfterUpdate () If Gender.Value = "Male" Then CalvingStatus.Enabled = Fa

我有一个奶牛场记录数据库。它有一个表格，我有奶牛的细节和它们的照片。我有一个表格字段[性别]。当我从这个字段[性别]中选择[男性]时，我想要这个。它应该禁用表单上的其他字段。当我选择[女性]时。它应该启用表单上的其他字段。如果选择为[男性]，则窗体应打开，字段为禁用；如果选择为[女性]，则窗体应打开，字段为启用

Private Sub Gender AfterUpdate ()

If Gender.Value = "Male" Then

CalvingStatus.Enabled = False

MilkDay.Enabled = False

Else if Gender.Value = "Female" Then

CalvingStatus.Enabled = True

MilkDay.Enabled = True

Else

CalvingStatus.Enabled = False

MilkDay.Enabled = False

End if

End Sub

Private子表单_Current（）
启用禁用
端接头
私人分性别_AfterUpdate（）
启用禁用
端接头
私有子启用禁用（）
如果Gender.Value=“男性”，则
CalvingStatus.Enabled=False
MilkDay.Enabled=False
ElseIf Gender.Value=“女性”则
CalvingStatus.Enabled=True
MilkDay.Enabled=True
其他的
CalvingStatus.Enabled=False
MilkDay.Enabled=False
如果结束
端接头

你好像错过了阅读的机会！这将向您展示如何使用和编码，然后更新问题！实际代码仅在您更新性别后更改，因为它驻留在该日期引发的事件中。如果在打开表单后发生同样的情况，则可能在该操作中引发了一个事件（请阅读表单上的文档-事件）；）