Aplication form

[romanl]

I’m creating a application form for admin and user'sto use. I created textboxes for username and password, and 2 buttons (Ok and Cancel).Button OK includes ACCESS VBA for entry in the application. Everything works fine,but I want to enable, when user write the username and password and press ENTERto automatically processed like if he would press the OK button. Right now Ineed the press if I want to enter in the application.
Thank you in advance for any help you can provide. Roman

[ranman256]

in both boxes afterupdate event, username and password,
put RunLogin , since the user can fill out the boxes in any order

sub txtUser_afterupdate()
   RunLogin
end sub

sub txtPass_afterupdate()
   RunLogin
end sub

sub    RunLogin()
   if not IsNull(txtUser) and not IsNull(txtPass) then
         'code to check the login
  endif
end sub

[romanl]

Sorry, but.....

... don't work it.

Private Sub txtLoginID_AfterUpdate()
Run Ukaz1 'trying runUkaz1 too
End Sub
----------
Sub txtPassword_AfterUpdate()
Run Ukaz1
End Sub
-----------
Where is place for:

sub RunLogin()
if not IsNull(txtUser) and not IsNull(txtPass) then
'code to check the login
endif
end sub

Access VBA procedure is located in (On Click)

[Gicu]

Hi Roman,

You can check the following post https://stackoverflow.com/questions/...-submit-button

You need to set the default property of the OK button to Yes and make sure that that is the button that receives focus after the Password textbox.

To use ranman256's code you need to use Call cmdOK_OnClick or whatever you called the OK button.

Cheers,
Vlad

[romanl]

Hi Vladan,
The Key Preview =True That's it!
But…
Where to insert this procedure in the properties of thebutton (which form; txt_pasword or txt_OK and place in properties ofbox))
How to correctly write this sentence;
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturnthen
...Submit script
End If
End Sub

This step of my project is already a nightmare!
Thank you for your help!
Roman

[Gicu]

Hi Roman,

If you know that the OK button will have the focus when the Enter key is pressed then all you need to do is to set its "Default" property to Yes (look on the "Other" tab of the Properties window of the command button itself.

To use the form's OnKeyPress event you need to put the first line of code in the OnLoad event of the form (Key Preview=Yes)

Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturnthen
Call cmdOK_OnClick
End If
End Sub

Keep in mind that this will run the code behind the button every time Enter is pressed, even if the user or password boxes are not yet populated, so you need to account for that in your code.

Cheers,
Vlad

[romanl]

Vlad, thank you for your time.

Property KeyPrevisevs= Yes / OK!
Textbox has only property; Enter key behavior; Default or New line in field

Error;


Private Sub Form_Load(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then
Call cmdOK_OnClick
End If
End Sub

Cheers, Roman

[Gicu]

Roman,
Not sure I follow you; you need to set the property "Default" of the OK command button to Yes, not sure what textbox you are referring to. You can put your form in an empty Access file and upload it here so we could have a look.

Cheers,
Vlad

[romanl]

Accees_test_forum.zip

[Gicu]

Hi Roman,
Have a look at the form now and see if that is what you wanted.
Cheers,
Vlad

[romanl]

It's working!

Thank you for your assistance.
With respect!
Roman