Menu
I have a login form to my database done in Access 2010 and using VBA code. I want to be able to press Enter on txtboxPassword and automatically execute btnLogin_Click event. I tried this:
Private Sub txtboxPassword_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
btnLogin_Click
End If
End Sub
What I get is a self-made error saying Password is incorrect. If I debug I see that actually txtPassword is null, but I just typed the text in it!
However If I click the Login button with the mouse it works perfect. Why does vba behave like that? How can I do it to make it work?
NOTE I also tried with:
btnLogin (maybe also because the tab order is like that), but the btnLogin_Click event is not executed.
690
Go to the Developer tab in the ribbon. Select the Button Form Control from the menu. Right click and hold the mouse then drag and release to create your button. The Assign Macro window will pop up and you can select the VBA procedure you want to run from the button.
VBA ActiveX CommandButton Control on the WorksheetGo To Developer Tab and then click Insert from the Controls group. Click on the Command Button from the ActiveX Controls group. Drag a Command Button on the Worksheet. Right click on the Command Button, before that Design Mode should be turned ON.
Step 1: Insert a new UserForm in your VBA and add TextBox in it. Step 2: Change the name of TextBox under Properties section to “My_Age”. Step 3: Double click on TextBox or right click on it and select View Code. Step 4: Now, try to add an If the condition which starts with If Not.
The buttons in Access have a property called Default (on the Other property page). If you set it to Yes
the form calls the button click event handler automatically, when you press Enter. No need for additional Key-event handling.
There is also a Cancel property. If you set it to Yes for a button, the form activates it automatically when the user types the Esc-key. Very practical for Cancel buttons.
145
If you love us? You can donate to us via Paypal or buy me a coffee so we can maintain and grow! Thank you!
Donate Us With
