Article View: pl.comp.lang.vbasic
Article #92475Re: Pole tekstowe
From: stayheavy
Date: Mon, 31 Oct 2005 21:08
Date: Mon, 31 Oct 2005 21:08
17 lines
1594 bytes
1594 bytes
Użytkownik "skyblast" <skyblast@linuxmail.org> napisał w wiadomości news:dk5vip$njq$1@atlantis.news.tpi.pl... > Mój, błąd - podałem Ci sposób działający pod VBA Excela, spróbuj tego: > > Private Sub Text2_KeyPress(KeyAscii As Integer) > If Not (IsNumeric(Chr(KeyAscii))) Then KeyAscii = 0 > If IsNull(Text2.Text) = True Then KeyAscii = 48 > End Sub > > I daj znać czy poszło. Pozdrawiam. O! Wszystko dziala jak powinno, serdeczne dzieki! Pozdr stayheavy
Technical Details
Message-ID:
<dk615a$kqf$1@nemesis.news.tpi.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!mat.uni.torun.pl!news.man.torun.pl!newsfeed.pionier.net.pl!newsfeed.silweb.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mailReferences:
<dk58kf$8lp$1@atlantis.news.tpi.pl> <dk5al1$2kr$1@nemesis.news.tpi.pl> <dk5c96$7ll$1@nemesis.news.tpi.pl> <dk5vip$njq$1@atlantis.news.tpi.pl>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!mat.uni.torun.pl!news.man.torun.pl!newsfeed.pionier.net.pl!newsfeed.silweb.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail From: "stayheavy" <stayheavy@interia.pl> Newsgroups: pl.comp.lang.vbasic Subject: Re: Pole tekstowe Date: Mon, 31 Oct 2005 22:08:14 +0100 Organization: tp.internet - http://www.tpi.pl/ Lines: 19 Message-ID: <dk615a$kqf$1@nemesis.news.tpi.pl> References: <dk58kf$8lp$1@atlantis.news.tpi.pl> <dk5al1$2kr$1@nemesis.news.tpi.pl> <dk5c96$7ll$1@nemesis.news.tpi.pl> <dk5vip$njq$1@atlantis.news.tpi.pl> NNTP-Posting-Host: aqq226.neoplus.adsl.tpnet.pl X-Trace: nemesis.news.tpi.pl 1130792938 21327 83.26.176.226 (31 Oct 2005 21:08:58 GMT) X-Complaints-To: usenet@tpi.pl NNTP-Posting-Date: Mon, 31 Oct 2005 21:08:58 +0000 (UTC) X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2900.2180 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2180 X-RFC2646: Format=Flowed; Response MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit