Programación General => Visual Basic 6.0 e inferiores => Visual Basic para principiantes => Mensaje iniciado por: Lucer en Domingo 4 de Diciembre de 2005, 20:56
Título: Boton Repulsado
Publicado por: Lucer en Domingo 4 de Diciembre de 2005, 20:56
Hola,
Me gustaria saber una funcion para que una vez se haya pulado un boton, no se pueda volver a pulsar o que el efecto sea ese. Es que estoy haciendo un programa para conectarme a un mobil y si le das a conectar dos veces falla, asi pues queria evitar esa segunda vez.
Y mi segunda duda:
Para hacer que lo que esta escrito en un tex box pase a otro texbox, variable, etc, por medio de un intro ¿como se hace? Se que existe el evento keypress, pero no logro hacerlo funcionar.
Gracias ;)
Título: Re: Boton Repulsado
Publicado por: LeoJ90 en Domingo 4 de Diciembre de 2005, 22:21
Agregale esto: Boton.Enabled = False
Boton es el nombre del boton, cambiaselo al nombre q le hayas puesto. :comp:
Título: Re: Boton Repulsado
Publicado por: Lucer en Lunes 5 de Diciembre de 2005, 10:44
Gracias ;)
Y lo del intro, alguien sabe?
Título: Re: Boton Repulsado
Publicado por: Shiquilla en Lunes 5 de Diciembre de 2005, 16:34
Si quieres que al dar el intro en cualquier caja de texto pase algo, lo más rápido es esto:
- La propiedad KeyPreview del formulario ponla a TRUE. - El evento
Código: Text
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then
KeyAscii = 0
MsgBox "Aquí la acción que quieras"
End If
End Sub
Si quieres que al dar el intro en una caja en concreto pase algo, lo más rápido es:
Código: Text
Private Sub text1_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then
KeyAscii = 0
MsgBox "Aquí la acción que quieras"
End If
End Sub
Saludos,
Título: Re: Boton Repulsado
Publicado por: Lucer en Lunes 5 de Diciembre de 2005, 23:05
Gracias Shiquilla ;)
Título: Re: Boton Repulsado
Publicado por: Soultaker en Lunes 5 de Diciembre de 2005, 23:22