SetFocus

[ciruit]

Buenas.
Saben que tengo problemas al poner la propiedad SetFocus en una condición. Ejemplo:

Código [Seleccionar] Expandir


Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 And Text1.SetFocus Then ' Aca se provoca el error.
        Text2.SetFocus
    End If
End Sub


¿Por qué?

[NYlOn]

SetFocus no es una propiedad, no puede devolver un valor.
El SetFocus sirve, por ejemplo, si queres poner en foco algun control. Podes poner Text1.SetFocus y se pone en foco el Text1.
Lo que estas intentando hacer lo podes cambiar utilizando el evento Got_Focus

Saludos.

[ciruit]

Emmm... ok.
¿Pero eso que haría?
Gracias.

[JuszR]

SetFocus es método.

[ReViJa]

En mi opinión la forma correcta seria :

Código [Seleccionar] Expandir


Private Sub Tex1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then Text2.SetFocus
End Sub


[ciruit]

Okey.
Problema resuelto.
Saludos.