Se está a usar o calendario nativo, tem de ser neste evento;
Código:
Private Sub SeuCampoData_Change() Me.cbosetor.SetFocus End Sub
................................................................................. Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Não sou fã do Date Picker, ele não foi a melhor inovação da Microsoft em caixas de texto, não tem recursos para manipulação e só funciona no evento de procedimento ao alterar.
Existem mil maneiras de fazer nestum, com outro tipo de recurso.
................................................................................. Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.