numerieke toetsen EN backspace of delete

Thread View: be.comp.programming

1 messages

[T] Back to Threads [V] Tree View [G] Group Articles

1 total messages Started by Netghost Wed, 15 Oct 2003 18:08

#3841

Author: Netghost
Date: Wed, 15 Oct 2003 18:08

15 lines
1430 bytes

Hoi... ik heb in n visual basic programma volgende code

Private Sub txtverstrekking1_KeyPress(KeyAscii As Integer)
Dim intdummy As Integer
If keyascii < Asc("0") Or keyascii > Asc("9") Then
keyascii = 0
intdummy = MsgBox("Enkel cijfers ingeven a.u.b.", vbOKOnly + vbInformation,
"Verkeerde ingave")
End If

Natuurlijk werkt nu de backspace ook niet, om te corrigeren. Wat moet ik
hier juist bijplaatsen om deze toets toch te laten werken?
TIA

NG.

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads