Visual Basic - Duda con TextBox!!!

Hola programadores, se me ha presentado un problema ya que poseo un textbox el cual esta codificado para que el usuario al escribir en él un número me detecte automaticamente el nombre del estado al que pertenece ese número (código) . Por ejemplo si coloca "1" me pondria el estado "Dtto Capital" pero si coloco "10" es "Guarico". Ahora bien tengo el problema que si se coloca 19 el cual no pertenece a ningun estado me sigue mostrando Guarico. Como puedo hacer en este caso para que me tome el número exacto ya que he intentado con el "val" y nada pero de igual forma no puedo. El código que tengo actualmente es el siguiente:

Private Sub TXTcodedo_Change()
If TXTcodedo <> "" Then
Set OFICI = DATA.OpenRecordset("Select distinct CODEDO, ESTADO from OFICINAS where CODEDO = " & TXTcodedo.Text & "")
If OFICI.RecordCount > 0 Then
OFICI.MoveFirst
Do While Not OFICI.EOF
TXTestado.Text = OFICI!estado
OFICI.MoveNext
Loop
End If
Else
TXTestado = ""
End If
End Sub

Intente colocar algo asi:
If TXTcodedo.MaxLength = Len(TXTcodedo.Text) Then
Pero no me sirve porque se guinda la aplicación y tampoco le vi mucho sentido... Agradeceria muchisimo de tu ayuda