How to check the Caps Lock Key status through vb applicaqtion without using timer control?

Question

5.00/5 (1 vote)

See more:

Hello Everybody,
Can anyone explain me briefly how to check the caps lock keys status in vb application without using timer control.

I have checked the status of the caps lock key by using timer control as follows.

************************************************************************
********************* codes ******************************
************************************************************************

I have taken a label & named it lblCapsLock. Then take a timer control & named as timer1. Set the timer1 control properties Enable, False to True and interval= 1000.
Now on tick event of the timer control I have written

VB

Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        lblCapslock.Text = "CAPS LOCK: " & IIf(My.Computer.Keyboard.CapsLock = True, "ON", "OFF")
    End Sub

similarly U can set the status for other keys.
It works nice. But, I want to know that, how to set the status without using timer control. If anybody knows then please tell me.

Regards,
Subrat, Desktop Application Developer
Rourkela, Orissa, India :-O :cool::cool::thumbsup::cool::thumbsup:

Posted 2-Nov-10 1:11am

Subrat Kumar Rautara

Updated 2-Nov-10 1:14am

v3

Add a Solution

Comments

JF2015 2-Nov-10 8:03am

Here is an article on keyboard hooks. Although it is in C# it might help you:
http://www.codeproject.com/KB/cs/globalhook.aspx

4 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

**JF2015** · Answer 1 · 2010-11-02T01:38:00

Solution 2

You can use the KeyDown event for your purpose. All you need to do is to create an event handler that will notice if the Caps Lock key was pressed. You would also want to read the Caps status at the start of your application.

VB

Private Sub Form1_KeyDown (...) Handles MyBase.KeyDown
  If e.KeyCode = Keys.CapsLock Then
    lblCapslock.Text = "CAPS LOCK: " & IIf(My.Computer.Keyboard.CapsLock = True, "ON", "OFF")
  End If
End Sub

Posted 2-Nov-10 1:38am

JF2015

Comments

Subrat Kumar Rautara 2-Nov-10 7:59am

You are right. I have done it so earlier. But there is a error. It will works only when the window is in active state. If you will minimized the window and then test it, or ON/OFF the key then it will not work.
Is there any method?

Simon_Whale 2-Nov-10 13:24pm

nice answer

**Dalek Dave** · Answer 2 · 2010-11-02T01:33:00

Solution 1

This may help[^]

Posted 2-Nov-10 1:33am

Dalek Dave

Dave Kreskowiak · Answer 3 · 2010-11-05T06:59:00

Solution 4

The only other way to do this, based on your requirements, would be a global keyboard hook. There's tons of examples on the web, all you have to do is Google "VB.NET Global Keyboard Hook". Warning! Not for the faint of heart!

Posted 5-Nov-10 6:59am

Dave Kreskowiak

robertlebel · Answer 4 · 2010-11-04T20:14:00

Solution 3

I am having really hard time with this VB class i am taking would anyone care to help Robert6090 AIM name

Posted 4-Nov-10 20:14pm

robertlebel

Comments

Simon_Whale 5-Nov-10 7:46am

best thing is to start with the following http://msdn.microsoft.com/en-gb/beginner/default.aspx