Bienvenido a Visual Basic Siglo XXI
Inicio · Artículos · Descargas · Tu cuenta · Foros · Top 10
 
 


 
 
Módulos

· Inicio
· Artículos
· Blogs
· Buscar
· Comentarios
· Descargas
· Encuestas
· Enlaces
· Enviar artículos
· Estadísticas
· Foros
· Mensajes privados
· Recomiéndanos
· Top 10
· Tu cuenta
 
 

 
 
Publicidad

 
 

 
 
¿Quién está en línea?

Actualmente hay 17 invitados, 0 miembro(s) conectado(s).

Eres un usuario anónimo. Puedes registrarte aquí
 
 

 
 
Páginas amigas

Código web
!!! Gana dinero gratis !!!

Mundo JavaScript

Get Firefox!

Sorteo de visas

Audios de Chicho

ActiveLock

CabControl

Blog de Gustavo Alegre

RECMA - Vigilancia por Internet

Centrales telefónicas IP
OnGlasses.net - Contenidos de programación, artículos, foros,  videos, noticias, eventos y chat.
 
 

 
 
Visual Basic Siglo XXI: Foros
 
 


 
  Visual Basic Siglo XXI :: Ver tema - salto en funcion
 FAQFAQ   BuscarBuscar   Grupos de UsuariosGrupos de Usuarios   PerfilPerfil   Entre para ver sus mensajes privadosEntre para ver sus mensajes privados   LoginLogin 

salto en funcion

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> General
Ver tema anterior :: Ver tema siguiente  
Autor Mensaje
eberriosberrios
Invitado





MensajePublicado: 21/07/2005 07:21:03 am    Asunto: salto en funcion Responder citando

Hola les cuento:

Tengo a el siguiente código de validación para ingresar solo numero

If (KeyAscii >= 48 And KeyAscii <= 57) Or KeyAscii = 8 Or KeyAscii = 13 Then
If KeyAscii = 13 Then

End If
Else
MsgBox "solo caracteres"
KeyAscii = 8
End If

Este código lo tengo en un modulo y lo llamo como una función en la línea dos hasta la 4 quiero agregar un código de tabindex con la tecla enter, o sea si aprieta entre en vez de un numero que salte a a la siguiente textbox como puedo hacer para reconocer que textbox ejemplo text30 y que el salto sea text31 (son muuuuchos campos aprox. 100 que ingresar un par de números) espero haberme explicado bien muxas gracias

Salu2
Volver arriba
galegre
Administrador del sitio
Administrador del sitio


Registrado: Sep 21, 2004
Mensajes: 42
Ubicación: Lima

MensajePublicado: 26/07/2005 07:48:24 pm    Asunto: Responder citando

Bueno, dejame ver si te entiendo. Idea

Para pasar de un campo a otro puedes utilizar la api "keyb_event", aquí te dejo un ejemplo:

Código:
'A pegar en el módulo

Const VK_TAB = &H9
Const KEYEVENTF_KEYUP = &H2
Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Public Sub SendTab()
    keybd_event VK_TAB, 0, 0, 0
    keybd_event VK_TAB, 0, KEYEVENTF_KEYUP, 0
End Sub


Luego cuando quieras pasar al siguiente campo desde código, llamas a "SendTab".
_________________
Saludos,
Gustavo Alegre.
Volver arriba
Ver perfil de usuario Enviar mensaje privado Visitar sitio web del autor Yahoo Messenger MSN Messenger
Yuri
Medio
Medio


Registrado: Aug 03, 2005
Mensajes: 30
Ubicación: Lima

MensajePublicado: 04/08/2005 10:51:23 am    Asunto: Responder citando

Hola.

Mira se pueden hacer algunas cosas al respecto

1.- Como dijo Gustavo puedes insertar la funcion de salto de campo que te ha propuesto dentro de tu funcion de validacion. Ahora como controlar el que vaya al campo siguiente. Eso tienes que hacerlo con la propiedad TabIndex en cada control, para darle una secuencia a tus controles.

2.- Ahora si lo que quieres es que salte de campo en campo cada vez que da un Enter, lo mas practico es usar el metodo KeyPress del formulario y cambiar la propiedad KeyPreview a True. Tambien tienes que ordenar los tabindex, pero haces en una sola funcion lo que tendrias que programar en todos los eventos de todos tus controles

Private Sub Form_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then
SendKeys "{TAB}" ' Puedes cambiar esta linea por la funcion API
End If
End Sub

Ahora bien tus validaciones de solo numeros o solo letras, las puedes hacer usando MaskEdit Control, que te permite precisamente validar los ingresos de teclado a la mascara que tu quieras.


Espero te ayude

Saludos

Yuri
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mostrar mensajes de anteriores:   
Publicar nuevo tema   Responder al tema    Foros de discusión -> General Todas las horas son GMT - 5 Horas
Página 1 de 1

 
Cambiar a:  
Puede publicar nuevos temas en este foro
No puede responder a temas en este foro
No puede editar sus mensajes en este foro
No puede borrar sus mensajes en este foro
No puede votar en encuestas en este foro

Powered by phpBB 2.0.7 © 2001 phpBB Group
phpBB port v2.1 based on Tom Nitzschner's phpbb2.0.6 upgraded to phpBB 2.0.4 standalone was developed and tested by:
ArtificialIntel, ChatServ, mikem,
sixonetonoffun and Paul Laudanski (aka Zhen-Xjell).

Version 2.1 by Nuke Cops © 2003 http://www.nukecops.com

 
 

Forums ©






 
 
Cultura general © 2006. Todos los derechos reservados.
Visual Basic es una marca registrada de Microsoft Corporation.
Esta web ha sido elaborada utilizando PHP-Nuke. Copyright © 2005. Todos los derechos reservados. PHP-Nuke es un Software Libre desarrollado bajo la licencia GNU/GPL.
Página Generada en: 0.136 Segundos