Определить щелчок по текстовому полю в форме

Question

Я хочу, чтобы определенная функция запускалась каждый раз, когда кто-то нажимает на текстовое поле в моей форме.До сих пор мне удавалось определить, когда он получает фокус, и когда он дважды щелкает мышью, используя следующие два обработчика событий, но я не уверен насчет , как отследить, когда он щелкается один раз, когда он уже имеет фокус .

У кого-нибудь здесь есть опыт ловли такого события?Кажется, я не вижу очевидных подозреваемых в выпадающих меню редактора VBA.

Private Sub tbxTil_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
    Me.tbxTil = format(oppdater_dato(CDate(Me.tbxTil)), "dd.mm.yy", vbMonday, vbFirstFourDays)
End Sub

Private Sub tbxTil_Enter()
    Me.tbxTil = format(oppdater_dato(CDate(Me.tbxTil)), "dd.mm.yy", vbMonday, vbFirstFourDays)
End Sub

Answer 1

Вы можете использовать события мыши, что-то вроде этого:

Private Sub tbxTil_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
   MsgBox "Click"
End Sub