질문이 잘 이해되지 않습니다.

'텍스트 박스를 클릭하였을 때, 현재 출력된 텍스트가 선택'이라는 것이 잘 이해가 안 되는데요..
'텍스트 박스를 클릭하였을 때, 텍스트 박스 안에 있는 텍스트가 모두 선텍' 이라는 의미인가요?

일단 'KeyPress' 이벤트에 정의해 놓은 것은 질문과 관계 없는듯 하고요..

그리고 프로그래밍 하실 때에는 '클릭'과 '포커스'를 구분하셔야 합니다.

텍스트 박스에 포커스가 갈 때를 원하는 것인지..
텍스트 박스를 클릭할 때를 원하는 것인지 구분해야 합니다.

액세스 기본 동작으로, 탭 키 등으로 포커스가 이동되면, 원하시는 대로 텍스트 박스 안의 텍스트가 모두 선택됩니다. 그러니 이것을 별도로 구현할 필요는 없겠죠.

그러나 '클릭' 했을 때에는 텍스트 박스에서 내가 클릭한 부분에 커서가 갑니다. (SelLength=0)

그러니, 이번에는 '클릭' 이벤트를 사용해야 합니다.

Private Sub txt테이블_Click()
  txt테이블.SelStart = 0
  txt테이블.SelLength = Len(txt테이블)
End Sub

엄밀히 말하자면, 마우스로 클릭했을 때, 기본적으로 텍스트 박스의 모든 텍스트가 선택됩니다.
그러나 '클릭'했기 때문에, SelLength가 사라지고, 내가 클릭한 부분만 커서가 위치하게 되는 것이 됩니다.
그러니 위에 작성하신 GotFocus가 작동하지 않는 것이 아니고, 작동은 했는데 너무 빨리 없어지게 된 것이라고 보면 됩니다.

잘 됩니다. 친절한 설명 감사합니다.