Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Problema con TabControl

09/01/2006 - 13:00 por aydai | Informe spam
Ayuda Hacer una pregunta
Hola a todos!!!Os cuento a ver si me podéis echar un cable.

En un formulario tengo un tabcontrol que tiene 3 páginas y lo que quiero
hacer es que al pulsa Shift + TAB en el primer campo de la página 2 el foco
pase al último campo de la página 1, y claro hacer lo mismo para pasar de la
página 3 a la 2. He probado el siguiente código pero no ha funcionado :S.

Gracias y un saludo.

Técnicos Aydai.
Juanje.

Private Sub txt_tpa7_nombre1_KeyDown(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyEventArgs) Handles txt_tpa7_nombre1.KeyDown

If e.Shift = True And e.KeyCode = Keys.Tab Then 'Si se pulsa Shift + Tab

TabDatos.SelectedIndex = 0 'Pasar a la primera pagina del tabcontrol

txt_tpa7_prefi_nif.Focus() 'Y poner el foco en el ultimo campo de la
pagina

End If

End Sub
email Siga el debateRespuesta 2 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 GilNaj
09/01/2006 - 23:18 | Informe spam
¿En que parte del código es donde no te funciona?, porque el cambio de tab
yo lo hago igual y funciona perfectamente.

El e.shift toma valores 0 o 1.

Y Tab no se puede capturar con keydown (al menos yo no he podido).

Tal vez deberías intentar con shift y otra tecla.

De cualquier manera si lo resuelves con tab avísme.

Espero que te haya servido.

"" escribió en el mensaje
news:
Hola a todos!!!Os cuento a ver si me podéis echar un cable.

En un formulario tengo un tabcontrol que tiene 3 páginas y lo que quiero
hacer es que al pulsa Shift + TAB en el primer campo de la página 2 el
foco pase al último campo de la página 1, y claro hacer lo mismo para
pasar de la página 3 a la 2. He probado el siguiente código pero no ha
funcionado :S.

Gracias y un saludo.

Técnicos Aydai.
Juanje.

Private Sub txt_tpa7_nombre1_KeyDown(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyEventArgs) Handles txt_tpa7_nombre1.KeyDown

If e.Shift = True And e.KeyCode = Keys.Tab Then 'Si se pulsa Shift +
Tab

TabDatos.SelectedIndex = 0 'Pasar a la primera pagina del
tabcontrol

txt_tpa7_prefi_nif.Focus() 'Y poner el foco en el ultimo campo de
la pagina

End If

End Sub








Preguntas similares

 

Busqueda sugerida :