Выделить содержимое текста в поле

Понедельник, 08 Октября 2018 г. 11:51 + в цитатник

Задача простая, нужно чтобы по нажатию горячих клавиш выделялся весь текст внутри поля.
Не могу понять, почему не срабатывает нажатие «Ctrl+A»???

+ В редакторе VBA в пошаговом режиме видно, что код срабатывает:

Private Sub Form_Load()
  Me.KeyPreview = True
End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

  Select Case KeyCode
    Case vbKeyA
      If Shift = 2 Then '1-SHIFT (fmShiftMask), 2-CTRL (fmCtrlMask), 4-ALT (fmAltMask)
        Me.RibbonXML.SetFocus
        Me.RibbonXML.SelStart = 0
        Me.RibbonXML.SelLength = Len(Me.RibbonXML.Text)
      End If
  End Select
End Sub

___________________________________
Использую Microsoft Access 2010, 64 бит.

Спасибо каждому, кто мне когда-либо здесь помог и продолжает помогать.

http://www.sql.ru/forum/1303585/vydelit-soderzhimoe-teksta-v-pole