Propriedades Text e Value de textBox

Preciso de obter o texto escrito numa textBox cujo conteúdo vai ser formatado como uma data no formato yyyymmdd. Acontece que, por alguma razão, não estou a conseguir obter o respectivo valor. Sei que a propriedade assumida por defeito quando se usa apenas o nome do controlo (txtData, no meu exemplo) é Value.

Por outro lado, já tentei usar a propiedade Text, mas esta abordagem tem o senão de ter de colocar o foco no objecto para poder devolver o valor. Nesse sentido, o que posso fazer para conseguir verificar o valor em questão?

Segue o código relevante:

Private Sub ddlOrigem_Change()
ActualizarLstPercursos
End Sub

Private Sub ddlDestino_Change()
ActualizarLstPercursos
End Sub

Private Sub txtData_Change()
ActualizarLstPercursos
End Sub

Private Sub ActualizarLstPercursos()
If Not IsNull(ddlOrigem.Value) And Not IsNull(ddlDestino.Value) And Not IsNull(txtData) Then

 strSql = "SELECT * FROM tblPercursos WHERE Origem = '" & ddlOrigem.Value & "' AND Destino = '" & ddldestino.Value & "' AND Data = " & Format(txtData, "yyyymmdd")
 End If

Obrigado.