Yo lo hago de la siguiente forma:
Me creo una función tal que esta:
Código:
Private Sub Set_Focus(ByVal caja As String)
Dim strScript As String
strScript = "<script language=javascript> document.all('" & caja & "').focus() </script>"
RegisterStartupScript("focus", strScript)
End Sub
Posteriormente, para posicionar el foco en la "caja" se puede hacer así (en el ejemplo, el textbox se llama tbCodi)
Y listo... saludos!!!