代码之家  ›  专栏  ›  技术社区  ›  Lando

我可以添加UI动作确认吗?

  •  0
  • Lando  · 技术社区  · 7 年前

    我有一个显示记录的表单(大约40个字段)。我有一个按钮,可以在需要轻微更改的情况下复制记录(即A541AB变为A541AC)。我在互联网站上看到了几个解决方案的实例,但我找不到一个适用于此UI操作的实例。是否可以创建一个确认框,询问他们是否确定要复制记录?目前,该按钮是使用宏设计的,因为我不太擅长访问VBA。

    1 回复  |  直到 7 年前
        1
  •  0
  •   Kostas K.    7 年前

    您需要在VBA中通过设置标志来处理自动更新。单击按钮后,询问用户并保存答案是否为“是”。

    'Set a flag for manual update
    Private mIsUserUpdate As Boolean 'Flag
    
    'Cancel auto-update
    Private Sub Form_BeforeUpdate(Cancel As Integer)
        If Not mIsUserUpdate Then Cancel = True
    End Sub
    
    'Save Button - Change 'YourButtonName'
    Private Sub YourButtonName_Click()
        If MsgBox("Are you sure you want to duplicate the record?", vbYesNo + vbQuestion, "Confirm") = vbYes Then
            mIsUserUpdate = True  'flag ON
            DoCmd.RunCommand acCmdSaveRecord
        End If
        mIsUserUpdate = False 'flag OFF again
    End Sub