根据组合框值更新文本框

Question

我有一个有4个值的组合框
等级1 2级
3级
4级
我想在用户更改组合框中的值时将文本框更新为当前日期。
我正在努力解决以下问题 假设用户将组合框的值从级别1更改为级别2，文本框将更新为当前日期。没有问题 在同一会话中，同一用户将组合框值从级别2更改为级别1，然后文本框应更新为级别1的旧日期。
我正在使用连续形式
任何帮助表示赞赏。

Answer 1

理解这可能有点棘手。我会尽力解释它。您当前使用的事件将是更新后的ComboBox。如果您将代码移动到更新前的表单以及ComboBox的AfterUpdate，这可能会更容易处理。这将使会议集中在一个屋檐下。

我的意思是在BeforeUpdate事件中，首先检查ComboBox的值是否已更改。如果有，则更改Datecontrol的值。

Private Sub Form_BeforeUpdate(Cancel As Integer)
    If Me.comboBoxName.OldValue = Me.comboBoxName.Value Then
        Me.dateControlName.Undo
    End If
End Sub

为此，ComboBox应绑定到表中的字段。