Solved

detecting the enter keypress iin VB.net

Posted on 2006-11-15
7
13,949 Views
Last Modified: 2008-03-17
Hello

I have a login screen containing a panel having two textboxes login and password and a login button

Now when a user enters the username and a passsword, and presses enter , he should automatically login, no need to use tab to go to the button , or use the mouse

How do I detect the "Enter" keypress and then automatically have the login button activated ?

Please help asap
0
Comment
Question by:jbajaj
7 Comments
 
LVL 16

Expert Comment

by:Hillwaaa
ID: 17945603
Hi jbajaj,

For the form you are in, there is an AcceptButton property.  Set this in the properties window to the name of the Login button and you're done.

Cheers!
0
 
LVL 16

Expert Comment

by:Hillwaaa
ID: 17945612
Or in code, if you prefer:

Me.AcceptButton = Me.Button1
0
 

Author Comment

by:jbajaj
ID: 17945622
Cool

I have two panels and each having two seperate buttons .
Only one of them is visible at a time

When one is visible I want it to have the accrpt button and vice versa

How do I do that

Is using a variable between them the only solution
0
Free Tool: Postgres Monitoring System

A PHP and Perl based system to collect and display usage statistics from PostgreSQL databases.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
LVL 16

Expert Comment

by:Hillwaaa
ID: 17945649
When you make the panel1 visible, make button1 the acceptbutton,

Then when panel2 is made visible, make button2 the acceptbutton.

0
 
LVL 5

Expert Comment

by:DEEPESH
ID: 17945654
Then in that case
if panel1.Visible = true then
   Me.AcceptButton = Me.Button1
Else
  Me.AcceptButton = Me.Button2
End if
0
 
LVL 5

Accepted Solution

by:
Venkateswarlu Kaipu earned 500 total points
ID: 17946029
   Public Function KeyAscii(ByVal UserKeyArgument As KeyPressEventArgs) As Short
        KeyAscii = Asc(UserKeyArgument.KeyChar)
    End Function

    Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        If KeyAscii(e) = 13 Then
            MsgBox("you press ENTER key")
        End If
    End Sub


Regards,
Venkat
0
 
LVL 85

Expert Comment

by:Mike Tomlinson
ID: 17947808
Or you can do something like...

    Protected Overrides Function ProcessCmdKey(ByRef msg As System.Windows.Forms.Message, ByVal keyData As System.Windows.Forms.Keys) As Boolean
        If keyData = Keys.Enter Then
            If Panel1.Visible Then
                Button1.PerformClick()
            Else
                Button2.PerformClick()
            End If
        End If
    End Sub
0

Featured Post

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This tutorial demonstrates one way to create an application that runs without any Forms but still has a GUI presence via an Icon in the System Tray. The magic lies in Inheriting from the ApplicationContext Class and passing that to Application.Ru…
It’s quite interesting for me as I worked with Excel using vb.net for some time. Here are some topics which I know want to share with others whom this might help. First of all if you are working with Excel then you need to Download the Following …
Microsoft Active Directory, the widely used IT infrastructure, is known for its high risk of credential theft. The best way to test your Active Directory’s vulnerabilities to pass-the-ticket, pass-the-hash, privilege escalation, and malware attacks …
Two types of users will appreciate AOMEI Backupper Pro: 1 - Those with PCIe drives (and haven't found cloning software that works on them). 2 - Those who want a fast clone of their boot drive (no re-boots needed) and it can clone your drive wh…

856 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question