🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.vbasic
Article #92477

Re: Pole tekstowe

#92477
From: stayheavy
Date: Mon, 31 Oct 2005 21:05
18 lines
1517 bytes
Użytkownik "Karlo" <karlo47@wp.pl> napisał w wiadomości 
news:dk5dg1$aa3$1@nemesis.news.tpi.pl...
> A może spróbujesz czegoś takiego?
> If IsNumeric(Me.Text1.Text) Then
>     If (Int(Me.Text1.Text) < 0) Or (Int(Me.Text1.Text) > 255) Then
>         MsgBox "Proszę wprowadzić liczbę z zakresu 0-255"
>     Else
>         '.....Wykonywany kod
>     End If
> Else
>     MsgBox "Proszę wprowadzić LICZBĘ z zakresu 0-255"
> End If

Sprawdzone, dziala calkiem ladnie :). Dzieki!

Pozdr

stayheavy 
Technical Details
Message-ID: <dk6100$k3e$1@nemesis.news.tpi.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.nask.pl!news.nask.org.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail
References: <dk58kf$8lp$1@atlantis.news.tpi.pl> <dk5dg1$aa3$1@nemesis.news.tpi.pl>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.nask.pl!news.nask.org.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:05:24 +0100
Organization: tp.internet - http://www.tpi.pl/
Lines: 20
Message-ID: <dk6100$k3e$1@nemesis.news.tpi.pl>
References: <dk58kf$8lp$1@atlantis.news.tpi.pl> <dk5dg1$aa3$1@nemesis.news.tpi.pl>
NNTP-Posting-Host: aqq226.neoplus.adsl.tpnet.pl
X-Trace: nemesis.news.tpi.pl 1130792769 20590 83.26.176.226 (31 Oct 2005 21:06:09 GMT)
X-Complaints-To: usenet@tpi.pl
NNTP-Posting-Date: Mon, 31 Oct 2005 21:06:09 +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