🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: free.it.visual-basic
Article #3308

Re: Gestione form

#3308
From: # www.jertix.org #
Date: Tue, 30 Jul 2002 23:46
18 lines
1450 bytes
nel Form3 crei una variabile public
Public TastoPremuto As Boolean

e nel Form_Load la imposti a False
TastoPremuto = False

Poi quando premi il taso la imposti a True

Do While
     ...
    If ( Condizione vera )
       DoEvents
       Form3.Visible = True
       Form3.Show
        Do While (Form3.TastoPremuto  = False)
        Loop
     End If
Loop
Technical Details
Message-ID: <MzF19.20912$lu5.575200@twister1.libero.it>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-01!sn-xit-04!supernews.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.wirehub.nl!news.mailgate.org!nntp.infostrada.it!twister1.libero.it.POSTED!not-for-mail
References: <Elb19.13933$n04.412494@twister2.libero.it>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f94ee,5860fe9296cdbe24
X-Google-Attributes: gidf94ee,public
X-Google-ArrivalTime: 2002-07-30 16:52:12 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-01!sn-xit-04!supernews.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.wirehub.nl!news.mailgate.org!nntp.infostrada.it!twister1.libero.it.POSTED!not-for-mail
From: "# www.jertix.org #" <jertix@jertix.org>
Newsgroups: free.it.visual-basic
References: <Elb19.13933$n04.412494@twister2.libero.it>
Subject: Re: Gestione form
Lines: 21
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <MzF19.20912$lu5.575200@twister1.libero.it>
Date: Tue, 30 Jul 2002 23:46:52 GMT
NNTP-Posting-Host: 151.29.85.144
X-Complaints-To: abuse@libero.it
X-Trace: twister1.libero.it 1028072812 151.29.85.144 (Wed, 31 Jul 2002 01:46:52 MET DST)
NNTP-Posting-Date: Wed, 31 Jul 2002 01:46:52 MET DST
Organization: [Infostrada]