Article View: be.comp.programming
Article #6285Re: Verplicht numerieke waarden in tekstbox in VB60
From: Frank
Date: Thu, 26 Dec 2002 18:01
Date: Thu, 26 Dec 2002 18:01
20 lines
1593 bytes
1593 bytes
Marc DEVLIEGER <Marc.Devlieger@pandora.be> schreef in berichtnieuws
xZFO9.3139$4S4.1174034875@hebe.telenet-ops.be...
> Hoi, hoe kan ik h��l simpel in VB60 aan een tekstbox wijsmaken
> dat er alleen numerieke waarden mag aanvaard worden ?
>
> Snel antwoord aub
>
CheckKeyAscii = Key
If Key > 31 Then
If Not IsNumeric(Chr(Key)) Then
CheckKeyAscii = 0
End If
End If
zet dit in het keypress event
mvg
Frank
Technical Details
Message-ID:
<8sHO9.2363$Ih.199910@news.chello.be>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-01!sn-xit-08!supernews.com!newsfeed.news2me.com!newsfeed.icl.net!newsfeed.fjserv.net!kibo.news.demon.net!demon!newshub1.home.nl!home.nl!amsnews01.chello.com!news.chello.be.POSTED!not-for-mailReferences:
<xZFO9.3139$4S4.1174034875@hebe.telenet-ops.be>Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII X-Google-Thread: fcea4,be79b9e686a000d9 X-Google-Attributes: gidfcea4,public X-Google-ArrivalTime: 2002-12-26 09:59:36 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-01!sn-xit-08!supernews.com!newsfeed.news2me.com!newsfeed.icl.net!newsfeed.fjserv.net!kibo.news.demon.net!demon!newshub1.home.nl!home.nl!amsnews01.chello.com!news.chello.be.POSTED!not-for-mail From: "Frank" <whois666@hotmail.com> Newsgroups: be.comp.programming References: <xZFO9.3139$4S4.1174034875@hebe.telenet-ops.be> Subject: Re: Verplicht numerieke waarden in tekstbox in VB60 Lines: 22 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 5.00.2615.200 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200 Message-ID: <8sHO9.2363$Ih.199910@news.chello.be> Date: Thu, 26 Dec 2002 19:01:31 +0100 NNTP-Posting-Host: 195.162.216.225 X-Complaints-To: abuse@chello.be X-Trace: news.chello.be 1040925572 195.162.216.225 (Thu, 26 Dec 2002 18:59:32 MET) NNTP-Posting-Date: Thu, 26 Dec 2002 18:59:32 MET Organization: Chello Belgium Usenet Service