keydown
 

в текстовом поле когда на клавиатуре нажимают

1 нужно получить 2

sub keydown (keycode)
if keycode=1 then abc.text=abc.text & "2"
keycode=0

вместо получить xxxxxxxx2 получаю xxxxxxxx12


помогите кто знает и понимает

я так понял ето на VB
если да то написать нужно на KeyPress event

Private Sub abc_KeyPress(KeyAscii As Integer)
If KeyAscii = Asc("1") Then
KeyAscii = Asc("2")
End If
End Sub