Access VBA: как управлять элементом, когда он имеет фокус

Question

Я пытаюсь отключить кнопку, когда на нее нажимают:

Private Sub submitButton_Click()

    Me.submitButton.Enabled = False
    If dataPath = "" Or skuPath = "" Then
        MsgBox "Please enter spreadsheet locations."
    Else

        Call importExcelData(dataPath, "data")
        Call importExcelData(skuPath, "skus")

        If validate = True Then
            Call generateReports
        End If
    End If

End Sub

Я получаю сообщение об ошибке во время выполнения: «Вы не можете отключить элемент управления, когда он имеет фокус».Вы знаете способ обойти это?

Спасибо!

Answer 1

Сначала необходимо установить фокус на другой элемент управления.

Тем не менее, если у вас действительно нет другого контроля, на который нужно направить фокус (в который я бы не поверил), есть «обходной путь». Вы можете добавить командную кнопку и установить для ее свойства TabStop значение False, а для свойства Transparent - значение True и установить фокус на этот элемент управления.