shift click on form button

Hey there,
I have a little experience with VBA and thus i need help, tx in advance if anyone can share some clues

what i have is a form with buttons, clicking on them changes values in some form fields.
i need the button when shift-clicked to change the value differently

in my code i have

Please Login or Register  to view this content.

and then

Please Login or Register  to view this content.

and this works fine when shift-click is used, but it also behaves the same when the next click on the same button comes, even if it is not a shift click.

any ideas how to make it work only the first time?

It seems to work for me. It adds one with just a click. It multiplies by 10 with Shift+Click. It then returns to adding 1 on regular click.

Do you want it to Add 10 (not multiply) on a Shift+Click?
Bilet1_count.Value = Bilet1_count.Value + 10

well I don't know what is wrong, i have no idea.
it performs correctly on the first time : multiplies by 10 on shift-click and just + 1 on click.
but on my form the next regular click also multiplies by 10 as long as i click the same button.
i have several buttons of the kind, the only difference is which field they alter.

so, for example, if the value is 1, by shift-click it becomes 10, but then with simple click it becomes 100 instead of 11. next click makes it 101 tho...
i'm lost :/

Give this a try (based on MSDN GetKeyState function)...

Please Login or Register  to view this content.

tx, works like charm, now it works in spite of sticky fingers etc

solved an annoying issue, cheers