Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés.
Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Iniciar sesión Cerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta

Visual Basic Avanzado - ToolTipTex

Vista:
Me gusta: Está pregunta es útil y esta clara
0
No me gusta: Está pregunta no esta clara o no es útil
 
Asunto:

ToolTipTex

Autor:Jhon Alexander (56 intervenciones)
Fecha:09/07/2005 03:12:44
Hola, necesito saber como puedo saber cuando la tecla BlopMayús este activadad, para asi poder sacar un ToolTipTex. (como en las contraseñas de windows.)

tengo mi direccion de correo en un Label, y quiero que cuando el usurio haga clic en este este le abra el Outlook para que me pueda enviar un correo.

Saludos, Alex.
Responder
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ToolTipTex

Autor:SuNcO (209 intervenciones)
Fecha:09/07/2005 05:31:51
Son 2 preguntas ? Bueno.. solo puedo ayudarte en la primera

Ocupas 2 botones solamente. El primer boton solo revisa y el segundo boton lo activa/desactiva dependiendo el estado actual (el problema es que el foco del teclado no prende/apaga.. tengo otro donde el foco del "bloq num" si prende/apaga) :

Const VK_CAPITAL = &H14

Private Type KeyboardBytes
kbByte(0 To 255) As Byte
End Type

Private Declare Function GetKeyboardState Lib "user32" (kbArray As KeyboardBytes) As Long
Private Declare Function SetKeyboardState Lib "user32" (kbArray As KeyboardBytes) As Long

Dim kbArray As KeyboardBytes

Private Sub Command1_Click()
GetKeyboardState kbArray

If kbArray.kbByte(VK_CAPITAL) = 1 Then
MsgBox "Activado"
Else
MsgBox "Apagado"
End If
End Sub

Private Sub Command2_Click()
GetKeyboardState kbArray

If kbArray.kbByte(VK_CAPITAL) = 1 Then
kbArray.kbByte(VK_CAPITAL) = 0
SetKeyboardState kbArray
Else
kbArray.kbByte(VK_CAPITAL) = 1
SetKeyboardState kbArray
End If
End Sub
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ToolTipTex

Autor:giuliana (1 intervención)
Fecha:14/10/2005 06:39:05
quierosaberquees tooltiptex?es untrabajo estudiantilporfavor
Comentar