Emulation of buttons pressed

[Jeka]

Hello! I need to write a project - Calculator.
I want that when I press on number key on keyboard I could
see that button on the screen with the same number will pressed too.
I want that my calculator will work just as like as Windows calculator.
So is there somebody that can help me please :-(

 

[petermeachem]

Set Keypreview for the the form to true. If you have an array of 10 buttons called Command1 and a label called Label1, then in Form_keypress do
If IsNumeric(Chr$(KeyAscii)) Then
Call Command1_Click(Chr$(KeyAscii))
End If
In Command1_Click do
Label1.Caption = Label1.Caption & " " & Index

This will sort of work. If the label is a text box, you will need to be careful to stop the form picking up the keystrokes as well as the text box.
Peter Meachem
peter@accuflight.com