Visual Basic - LostFocus no funciona

Tengo un formulario con varios mask , al pulsar sobre el primero antes se desplazaba al siguiente mask y me saltaba al lost focus, ahora le pulso enter y directamente no me hace nada, solo funciona cuando le pulso tabulador, que se va al lostfocus.
If KeyAscii = vbKeyReturn Then
' Si se ha pulsado <Intro>
KeyAscii = 0 ' ignorar la pulsación
TXT(Index).SelLength = 0
Select Case Index
Case txteCODIGO
Case Else
TXT(Index + 1).SetFocus
End Select

End If

Si lo que quieres es que al pulsar "enter", se posicione en otro control, o haga algo, puedes utilizar el evento "keypress"
y dentro de él, comprobar que el tecla pulsada es "enter"
if keyascii=13 then
micontrol.setfocus
end if